代码搜索：boolean
找到约 10,000 项符合「boolean」的源代码
代码结果 10,000
www.eeworm.com/read/246404/12727573
pas ac1153.pas
program tju1153;
const
maxn=30;
maxa=50;
maxs=maxa*maxn;
var
range:array[boolean,1..maxn]of integer;
ok:array[boolean,1..maxn,0..maxs]of boolean;
n,i,j,a,l1,l2:shortint;
procedure
www.eeworm.com/read/246404/12727854
pas ac1115.pas
program tju1115;
var
a,b:string;
a3,a4,b3,b4,an,bn:boolean;
function div3(s:string):boolean;
var
r,i:byte;
begin
r:=0;
for i:=1 to length(s) do
r:=(r+ord(s[i])) mod
www.eeworm.com/read/246404/12727989
pas ac1167.pas
program tju1167;
{$Q-,R-}
const
maxn=10000;
maxm=6001;
imp=-2100000000;
var
a:array[boolean,1..maxn]of longint;
f:array[boolean,0..maxm]of longint;
n,m,i,j,ans,k,l,t:longint;
b
www.eeworm.com/read/246404/12728042
pas ac1153.pas
program tju1153;
const
maxn=30;
maxa=50;
maxs=maxa*maxn;
var
range:array[boolean,1..maxn]of integer;
ok:array[boolean,1..maxn,0..maxs]of boolean;
n,i,j,a,l1,l2:shortint;
procedure
www.eeworm.com/read/246404/12728188
pas ac1028.pas
program tju1028;
var
b:array['a'..'z']of boolean;
m,n,i,j:longint;
s:string[3];
c:char;
first:boolean;
begin
readln(m);
for i:=1 to m do begin
readln(n);
fillchar(b,si
www.eeworm.com/read/246404/12728227
pas ac1055.pas
program tju1055;
const
maxn=100;
var
adj:array[1..maxn,1..maxn]of boolean;
v:array[1..maxn]of boolean;
n,x,y,z:byte;
ok:boolean;
procedure floodfill(x:byte);
var
i:byte;
b
www.eeworm.com/read/246404/12728788
pas ac1210.pas
program tju1210;
const
fac:array[1..5]of byte=(1,2,6,24,120);
type
perm=array[1..6]of byte;
var
a,b:perm;
q:array[1..176]of record p:perm;reach,step:byte;last:boolean;
end;
v:ar
www.eeworm.com/read/246404/12728928
pas ac1028.pas
program tju1028;
var
b:array['a'..'z']of boolean;
m,n,i,j:longint;
s:string[3];
c:char;
first:boolean;
begin
readln(m);
for i:=1 to m do begin
readln(n);
fillchar(b,si
www.eeworm.com/read/246404/12728944
pas ac1055.pas
program tju1055;
const
maxn=100;
var
adj:array[1..maxn,1..maxn]of boolean;
v:array[1..maxn]of boolean;
n,x,y,z:byte;
ok:boolean;
procedure floodfill(x:byte);
var
i:byte;
b
www.eeworm.com/read/246404/12729336
pas ac1210.pas
program tju1210;
const
fac:array[1..5]of byte=(1,2,6,24,120);
type
perm=array[1..6]of byte;
var
a,b:perm;
q:array[1..176]of record p:perm;reach,step:byte;last:boolean;
end;
v:ar