代码搜索：integer
找到约 10,000 项符合「integer」的源代码
代码结果 10,000
www.eeworm.com/read/211952/15169878
pas p1908.pas
PROGRAM p1908;
VAR
map :array[1..3,1..3]of Char;
part,p :Integer;
c,o :Integer;
FUNCTION check:Boolean;
var
www.eeworm.com/read/211952/15169899
pas p1940.pas
PROGRAM p1940;
CONST
maxn =30;
change :array[1..6,1..3]of Integer=
((1,0,0),(-1,0,0),(0,1,0),(0,-1,0),(0,0,1),(0,0,-1));
TYPE
Triple=record
x,y
www.eeworm.com/read/211952/15169900
pas p1942.pas
PROGRAM p1942;
CONST
max=1e10;
small=1e-8;
TYPE
Node=record
x,y :Integer;
end;
VAR
data
www.eeworm.com/read/211952/15169952
pas p2207.pas
PROGRAM p2207;
VAR
n,i,j,min :Integer;
ans,goal :String[5];
data :array[1..100]of String[5];
www.eeworm.com/read/211952/15169956
pas p2203.pas
PROGRAM p2203;
VAR
n,m,d,i :Integer;
prime :array[1..10000]of Boolean;
add :a
www.eeworm.com/read/211952/15169967
pas p2293.pas
PROGRAM p2293;
TYPE
position=record
x,y :Extended;
end;
CONST
max=1e15;
small=1e-7;
VAR
n,i
www.eeworm.com/read/211952/15169982
pas p1449.pas
PROGRAM p1449;
VAR
n :Integer;
map,sum :array[0..20,0..20,0..20]of Longint;
PROCEDURE Readin;
var
add
www.eeworm.com/read/211952/15169995
pas p1456.pas
PROGRAM p1456;
VAR
n,a,b,i :Integer;
edge,mincost,last :array[1..100,1..100]of Longint;
point :array[1..10
www.eeworm.com/read/211952/15170022
pas p1482.pas
PROGRAM p1482;
VAR
n,i,avilueble,area :Integer;
stay :array[1..3000]of Boolean;
next,total,col
www.eeworm.com/read/211952/15170030
pas p1737.pas
PROGRAM p11737;
VAR
part,p,i :Integer;
s,t :String;
PROCEDURE jp(var s:String);
begin
s:=s+s[1];
delete(s,1,1);
end;
P