- 最小非负值
- 2009-10-08 13:12:55 @
program P1141;
var n:string;
m:integer;
code:integer;
x:integer;
begin
read(n);
n:=copy(n,length(n)-1,2);
val(n,m,code);
x:=m mod 4;
begin
if (x=1) or (x=2) then write(1)
else if (x=0) or (x=3) then write(0);
end;
end.
1 条评论
-
jszx11726 LV 7 @ 2009-10-08 13:20:33
原来我没用ansistring,用成了string,
wa了8次,AC率从87%降到40%……
- 1