代码搜索：pascal
找到约 9,253 项符合「pascal」的源代码
代码结果 9,253
www.eeworm.com/read/189737/8456306
txt mathtypesdemo.txt
{
@abstract(EBK&NVS Pascal-Delphi Math Library: Test application)
@author(Nikolai V. Shokhirev )
@author(Eugene B. Krissinel
www.eeworm.com/read/189737/8456485
txt mathtypesdemo.txt
{
@abstract(EBK&NVS Pascal-Delphi Math Library: Test application)
@author(Nikolai V. Shokhirev )
@author(Eugene B. Krissinel
www.eeworm.com/read/372971/9484051
pas trees4.pas
Unit trees4;
{$T-}
{$J+}
{$define ORG_DEBUG}
{
trees.c -- output deflated data using Huffman coding
Copyright (C) 1995-1998 Jean-loup Gailly
Pascal tranlastion
Copyright (C) 1998 b
www.eeworm.com/read/358751/10180329
pas aggr.pas
{
PROB:aggr
LANG:PASCAL
}
program aggr;
const
maxn=100000;
var
x:array[1..maxn]of longint;
n,c,i,l,r,m,last,count:longint;
procedure qsort(s,t:longint);
var
p,i,j,tx:longint;
www.eeworm.com/read/358751/10180467
pas juice.pas
{
PROB:juice
LANG:PASCAL
}
program juice;
const
maxsize=300;
dx:array[1..4]of shortint=(0,0,1,-1);
dy:array[1..4]of shortint=(1,-1,0,0);
type
coord=record x,y:word;end;
var
a,b
www.eeworm.com/read/191687/6958697
8 fill48.8
;
; create 48KB fill pattern
;
; (C)1998-2001 Pascal Dornier / PC Engines; All rights reserved.
; This file is licensed pursuant to the COMMON PUBLIC LICENSE 0.5.
db 0C000h DUP 0FFh
www.eeworm.com/read/224292/7809248
8 fill48.8
;
; create 48KB fill pattern
;
; (C)1998-2001 Pascal Dornier / PC Engines; All rights reserved.
; This file is licensed pursuant to the COMMON PUBLIC LICENSE 0.5.
db 0C000h DUP 0FFh
www.eeworm.com/read/487047/6523013
pas trees4.pas
Unit trees4;
{$T-}
{$J+}
{$define ORG_DEBUG}
{
trees.c -- output deflated data using Huffman coding
Copyright (C) 1995-1998 Jean-loup Gailly
Pascal tranlastion
Copyright (C) 1998 b