一道普及NOIP题,我的运行结果怎么也得不到263

来源:百度知道 编辑:UC知道 时间:2024/06/13 18:10:59
program p:
var u:array[0..3] of integer;
a,b,c,x,y,z:integer;
begin
read(u[0],u[1],u[2],u[3]);
a:=u[0]+u[1]+u[2]+u[3]-5;
b:=u[0]*(u[1]-u[2] div u[3] +8);
c:=u[0]*u[1] div u[2]*u[3];
x:=(a+b+2)*3-u[(c+3) mod 4];
y:=(c*100-13) div a div (u[b mod 3]*5);
if (x+y) mod 2=0 then z:=(a+b+c+x+y) div 2;
z:=(a+b+c-x-y)*2;
writeln(x+y-z);
end.
输入:2 5 7 4
哪位大虾能把分析的过程告诉我吗?不胜感激.

read(u[0],u[1],u[2],u[3]); {读数据}
a:=u[0]+u[1]+u[2]+u[3]-5; {a 是13 }
b:=u[0]*(u[1]-u[2] div u[3] +8); {b 是 24 }
c:=u[0]*u[1] div u[2]*u[3]; {c是 4 }
x:=(a+b+2)*3-u[(c+3) mod 4]; { x 是 113 }
y:=(c*100-13) div a div (u[b mod 3]*5); { y 是 2 }
if (x+y) mod 2=0 then z:=(a+b+c+x+y) div 2;
z:=(a+b+c-x-y)*2; { z 是 -148 }
writeln(x+y-z); {113+2-(-148) 是263}

悬赏分太少了,再给一些吧。呵呵