代码搜索：Byte
找到约 10,000 项符合「Byte」的源代码
代码结果 10,000
www.eeworm.com/read/231652/14224736
pas ac1156.pas
program ural1156;
const
maxn=50;
type
solution=set of 1..maxn*2;
var
g:array[1..maxn*2,1..maxn*2]of boolean;
l:array[1..maxn*2]of byte;
ok,newok:array[0..maxn]of boolean;
way,neww
www.eeworm.com/read/231652/14224766
pas ac1142.pas
program ural1142;
const
maxn=10;
var
f:array[0..maxn]of longint;
n,i:shortint;
function c(a,b:byte):longint;
var
x:longint;
i:byte;
begin
x:=1;
for i:=1 to b do
www.eeworm.com/read/231652/14224813
pas ac1162.pas
program ural1162;
const
maxn=100;
maxm=100;
var
v1,v2:array[1..maxm]of byte;
r1,c1,r2,c2:array[1..maxm]of real;
money:array[1..maxn]of real;
n,m,s,i,j:byte;
procedure go(a,b:byte;
www.eeworm.com/read/231652/14224837
pas ac1089.pas
program ural1089;
const
maxwords=100;
var
dict:array[1..maxwords]of string[8];
words:byte;
mis:integer;
s:string;
procedure processline(s:string);
var
w:string;
procedure
www.eeworm.com/read/231652/14224985
pas ac1088.pas
program ural1088;
var
d,e,f,h,s,i:byte;
dp,ep,m:longint;
function max(a,b:byte):byte;
begin
if a>b then max:=a else max:=b;
end;
begin
readln(d,e,f,dp,ep,h);
s:=(f-d)+(f-e);
www.eeworm.com/read/231652/14225018
pas ac1091.pas
{This prog will fail when s reaches 60. Luckily, the limit is 50}
program ural1091;
var
k,s,i:byte;
ans:longint;
function prime(x:byte):boolean;
var
i:byte;
begin
for i:=2 to
www.eeworm.com/read/231652/14225033
pas ac1077.pas
program ural1077;
const
maxn=200;
maxt=(maxn-1)*(maxn-2) shr 1;
var
map:array[1..maxn,1..maxn]of boolean;
lv:array[1..maxn]of byte;
path:array[1..maxn,1..maxn]of byte;
n,m,i,x,y,s:
www.eeworm.com/read/231652/14225135
pas ac1324.pas
program ural1324;
const
r:longint=750000000;
var
l,m:longint;
t:byte;
function remain(x,y:longint):longint;
begin
remain:=x div y+y-2+ord(x mod y=y-1);
end;
function len(x:long
www.eeworm.com/read/231652/14225144
pas ac1323.pas
program ural1323;
const
maxn=10;
maxm=45;
maxstatus=511;
type
calllist=array[0..maxm]of integer;
var
name:array[1..maxn]of string[20];
v1,v2:array[1..maxm]of byte;
dist:array[0
www.eeworm.com/read/231652/14225165
pas ac1293.pas
program ural1293;
var
n,a,b:byte;
begin
read(n,a,b);
writeln(n*a*b*2);
end.