代码搜索：integer
找到约 10,000 项符合「integer」的源代码
代码结果 10,000
www.eeworm.com/read/211952/15169647
dpr p1312.dpr
program p1312;
{$APPTYPE CONSOLE}
var
sn :Integer;
t :integer;
n :integer;
c :longint;
prime :array[1..10000]of integer;
www.eeworm.com/read/211952/15169649
pas p1364.pas
PROGRAM p1364;
VAR
n,m,t,goal :Integer;
dis :array[0..201,0..201]of Integer;
maxget,puss :array[0..201]of Integer;
PROCEDU
www.eeworm.com/read/211952/15169665
pas p1554.pas
PROGRAM p1554;
TYPE
Tf = array[1..100,1..100,0..2] of Longint;
VAR
s : String;
f : Tf;
FUNCTION Check ( a , l , k :
www.eeworm.com/read/211952/15169693
pas p1504.pas
PROGRAM p1504;
VAR
n :Integer;
map :array[1..12,1..12]of Char;
PROCEDURE Main;
var
a,b,i,j,p,q :Integer;
www.eeworm.com/read/211952/15169694
pas p1536.pas
PROGRAM p1536;
CONST
lp=10000;
change :array[1..4,1..2]of Integer=
((1,0),(0,1),(-1,0),(0,-1));
TYPE
BigNum=array[0..100]of Longint;
VAR
n,k
www.eeworm.com/read/211952/15169700
pas p2186.pas
PROGRAM p2186;
VAR
a :array[1..3]of integer;
temp :integer;
i,j :integer;
BEGIN
while not eof do
begin
for i:=1 to 3 do
read(a[i
www.eeworm.com/read/211952/15169701
pas p2110.pas
PROGRAM p2110;
CONST
change :array[1..4,1..2]of Integer=
((0,1),(0,-1),(1,0),(-1,0));
TYPE
Position=record
x,y :I
www.eeworm.com/read/211952/15169709
pas p2193.pas
PROGRAM p2193;
VAR
i,j :Integer;
s :String;
map :array[1..4,
www.eeworm.com/read/211952/15169722
pas p2130.pas
PROGRAM p2130;
TYPE
Graph=array[1..60,1..60]of Char;
VAR
map,goal :Graph;
ans :Integer;
n,m,a,b
www.eeworm.com/read/211952/15169730
pas p2133.pas
PROGRAM p2133;
VAR
part,p :Integer;
n :Integer;
map :array[1..50,1..20]of Char;