点这里查看
讨论 / 60分~~~~~?????????????
swm 2013-08-05 17:33:00
点我顶贴 收藏 删除
var a,b,c,d,n,m,i,j:longint;

begin

read(n);

m:=0;

for i:=1 to n do

begin

read(a);

m:=a+m;

end;

m:=m mod 2*a;

writeln(m);

end.

我乱打的程序，都能60分？？？？？？？

#1 875880923@2013-08-05 17:33:00
回复 删除
数据太弱 看下面的帖子就知道了
查看更多回复
提交回复