0_0_2785514_31236\Main.java:1: 需要为 class、interface 或 enum
var
^
0_0_2785514_31236\Main.java:3: 需要为 class、interface 或 enum
ans:int64;
^
0_0_2785514_31236\Main.java:4: 需要为 class、interface 或 enum
function pow(x:longint):longint;
^
0_0_2785514_31236\Main.java:5: 需要为 class、interface 或 enum
var
^
0_0_2785514_31236\Main.java:7: 需要为 class、interface 或 enum
begin
^
0_0_2785514_31236\Main.java:9: 需要为 class、interface 或 enum
for i:=1 to x do
^
0_0_2785514_31236\Main.java:11: 需要为 class、interface 或 enum
pow:=s;
^
0_0_2785514_31236\Main.java:12: 需要为 class、interface 或 enum
end;
^
0_0_2785514_31236\Main.java:13: 需要为 class、interface 或 enum
procedure solve;
^
0_0_2785514_31236\Main.java:14: 需要为 class、interface 或 enum
var
^
0_0_2785514_31236\Main.java:16: 需要为 class、interface 或 enum
i,j,max1,max2,min:longint;
^
0_0_2785514_31236\Main.java:17: 需要为 class、interface 或 enum
temp:int64;
^
0_0_2785514_31236\Main.java:18: 需要为 class、interface 或 enum
s:string;
^
0_0_2785514_31236\Main.java:19: 需要为 class、interface 或 enum
function check(x:longint):boolean;
^
0_0_2785514_31236\Main.java:20: 需要为 class、interface 或 enum
var
^
0_0_2785514_31236\Main.java:22: 需要为 class、interface 或 enum
begin
^
0_0_2785514_31236\Main.java:24: 需要为 class、interface 或 enum
str(x,s);
^
0_0_2785514_31236\Main.java:25: 需要为 class、interface 或 enum
if pos('0',s)<>0 then exit;
^
0_0_2785514_31236\Main.java:26: 需要为 class、interface 或 enum
for i:=1 to length(s) do
^
0_0_2785514_31236\Main.java:30: 需要为 class、interface 或 enum
v[ord(s[i])-48]:=true;
^
0_0_2785514_31236\Main.java:31: 需要为 class、interface 或 enum
end;
^
0_0_2785514_31236\Main.java:32: 需要为 class、interface 或 enum
check:=true;
^
0_0_2785514_31236\Main.java:33: 需要为 class、interface 或 enum
end;
^
0_0_2785514_31236\Main.java:34: 需要为 class、interface 或 enum
function check2(x:longint):boolean;
^
0_0_2785514_31236\Main.java:35: 需要为 class、interface 或 enum
var
^
0_0_2785514_31236\Main.java:37: 需要为 class、interface 或 enum
begin
^
0_0_2785514_31236\Main.java:39: 需要为 class、interface 或 enum
check2:=false;
^
0_0_2785514_31236\Main.java:40: 需要为 class、interface 或 enum
if pos('0',s)<>0 then exit;
^
0_0_2785514_31236\Main.java:41: 需要为 class、interface 或 enum
for i:=1 to length(s) do
^
0_0_2785514_31236\Main.java:45: 需要为 class、interface 或 enum
v2[ord(s[i])-48]:=true;
^
0_0_2785514_31236\Main.java:46: 需要为 class、interface 或 enum
end;
^
0_0_2785514_31236\Main.java:47: 需要为 class、interface 或 enum
check2:=true;
^
0_0_2785514_31236\Main.java:48: 需要为 class、interface 或 enum
end;
^
0_0_2785514_31236\Main.java:49: 需要为 class、interface 或 enum
function check3(x:int64):boolean;
^
0_0_2785514_31236\Main.java:50: 需要为 class、interface 或 enum
var
^
0_0_2785514_31236\Main.java:52: 需要为 class、interface 或 enum
begin
^
0_0_2785514_31236\Main.java:54: 需要为 class、interface 或 enum
str(x,s);
^
0_0_2785514_31236\Main.java:55: 需要为 class、interface 或 enum
check3:=false;
^
0_0_2785514_31236\Main.java:56: 需要为 class、interface 或 enum
if pos('0',s)<>0 then exit;
^
0_0_2785514_31236\Main.java:57: 需要为 class、interface 或 enum
if length(s)<>c then exit;
^
0_0_2785514_31236\Main.java:58: 需要为 class、interface 或 enum
for i:=1 to length(s) do
^
0_0_2785514_31236\Main.java:62: 需要为 class、interface 或 enum
v3[ord(s[i])-48]:=true;
^
0_0_2785514_31236\Main.java:63: 需要为 class、interface 或 enum
end;
^
0_0_2785514_31236\Main.java:64: 需要为 class、interface 或 enum
check3:=true;
^
0_0_2785514_31236\Main.java:65: 需要为 class、interface 或 enum
end;
^
0_0_2785514_31236\Main.java:66: 需要为 class、interface 或 enum
function check4(x:int64):integer;
^
0_0_2785514_31236\Main.java:67: 需要为 class、interface 或 enum
begin
^
0_0_2785514_31236\Main.java:69: 需要为 class、interface 或 enum
if length(s)>c then check4:=0
^
0_0_2785514_31236\Main.java:71: 需要为 class、interface 或 enum
end;
^
0_0_2785514_31236\Main.java:72: 需要为 class、interface 或 enum
begin
^
0_0_2785514_31236\Main.java:74: 需要为 class、interface 或 enum
if (a=b) and (b=c) and (c<>1) then exit;
^
0_0_2785514_31236\Main.java:75: 需要为 class、interface 或 enum
if (a=0) or (b=0) or (c=0) then exit;
^
0_0_2785514_31236\Main.java:76: 需要为 class、interface 或 enum
if (c<a) or (c<b) then exit;
^
0_0_2785514_31236\Main.java:77: 需要为 class、interface 或 enum
i:=pow(a-1); min:=pow(b-1);
^
0_0_2785514_31236\Main.java:77: 需要为 class、interface 或 enum
i:=pow(a-1); min:=pow(b-1);
^
0_0_2785514_31236\Main.java:78: 需要为 class、interface 或 enum
max1:=i*10; max2:=min*10;
^
0_0_2785514_31236\Main.java:78: 需要为 class、interface 或 enum
max1:=i*10; max2:=min*10;
^
0_0_2785514_31236\Main.java:79: 需要为 class、interface 或 enum
inc(i);
^
0_0_2785514_31236\Main.java:80: 需要为 class、interface 或 enum
while i<max1 do
^
0_0_2785514_31236\Main.java:83: 需要为 class、interface 或 enum
if check(i) then
^
0_0_2785514_31236\Main.java:86: 需要为 class、interface 或 enum
while j<max2 do
^
0_0_2785514_31236\Main.java:89: 需要为 class、interface 或 enum
v2:=v;
^
0_0_2785514_31236\Main.java:90: 需要为 class、interface 或 enum
if check2(j) then
^
0_0_2785514_31236\Main.java:93: 需要为 class、interface 或 enum
inc(j);
^
0_0_2785514_31236\Main.java:94: 需要为 class、interface 或 enum
end;
^
0_0_2785514_31236\Main.java:95: 需要为 class、interface 或 enum
end;
^
0_0_2785514_31236\Main.java:96: 需要为 class、interface 或 enum
if check4(i*min)=0 then break;
^
0_0_2785514_31236\Main.java:97: 需要为 class、interface 或 enum
inc(i);
^
0_0_2785514_31236\Main.java:98: 需要为 class、interface 或 enum
end;
^
0_0_2785514_31236\Main.java:99: 需要为 class、interface 或 enum
end;
^
0_0_2785514_31236\Main.java:100: 需要为 class、interface 或 enum
begin
^
0_0_2785514_31236\Main.java:102: 需要为 class、interface 或 enum
while a+b+c<>0 do
^
0_0_2785514_31236\Main.java:105: 需要为 class、interface 或 enum
writeln(ans);
^
0_0_2785514_31236\Main.java:106: 需要为 class、interface 或 enum
readln(a,b,c);
^
0_0_2785514_31236\Main.java:107: 需要为 class、interface 或 enum
end;
^
0_0_2785514_31236\Main.java:108: 需要为 class、interface 或 enum
end.
|
