代码搜索：integer
找到约 10,000 项符合「integer」的源代码
代码结果 10,000
www.eeworm.com/read/211952/15170037
pas p1727.pas
PROGRAM p1727;
TYPE
Node = record
top , bottom , left , right
: Integer;
map : array[1..25,1..25] of Char;
end;
www.eeworm.com/read/211952/15170038
pas p1789.pas
PROGRAM p1789;
VAR
n,m :Integer;
pos :array[0..30000]of Integer;
whether :array[1..500,1..500]of Boolean;
reach :array[1..500]of Boolean;
PROCEDURE Readin;
var
i,j,t,a
www.eeworm.com/read/211952/15170046
pas p1756.pas
PROGRAM p1756;
TYPE
Node=record
a,b :Integer;
end;
VAR
total :Integer;
data :array[1..576]of Node;
x,y :Integer;
PROCEDURE Readin;
begin
total:=0;
while true do
begin
www.eeworm.com/read/211952/15170048
pas p1717.pas
PROGRAM p1717;
TYPE
BigNum=array[0..500]of Byte;
VAR
h,w :Integer;
max :array[1..70,1..70]of BigNum;
m
www.eeworm.com/read/211952/15170050
pas p1702.pas
PROGRAM p1702;
CONST
maxwide=30;
VAR
ste :Set of Char;
s :String;
n,wide,i :Integer;
positio
www.eeworm.com/read/211952/15170064
pas p1703.pas
{$R+,I+,Q+,S-}
{$M 16384,0,655360}
PROGRAM p1703;
TYPE
Tmap = array[0..3,0..3] of Integer;
Tscore = array[0..9] of Integer;
TInfor = record
m
www.eeworm.com/read/211952/15170066
pas p1720.pas
PROGRAM p1720;
VAR
i :Integer;
num :array[0..8]of Longint;
PROCEDURE Main;
var
i,p :Integer;
ch
www.eeworm.com/read/211952/15170105
pas p2048.pas
PROGRAM p2048;
TYPE
position=record
x,y :Integer;
end;
VAR
part,p :Integer;
tota
www.eeworm.com/read/211952/15170113
pas p2006.pas
PROGRAM p2006;
VAR
n,i,j,ans,part :Integer;
data :array[0..10000]of Char;
PROCEDURE Main;
var
i,k,p1,p2 :Integer;
d
www.eeworm.com/read/211952/15170133
pas p1802.pas
PROGRAM p1802;
VAR
n,i,part :Integer;
x,y :array[1..12]of Extended;
whether,cover :array[1..12,1..12]