讨论 / 最后一个点9621/6653?
乒乒乓乓乒乒乓乓 2012-08-06 01:13:00
点我顶贴 收藏 删除
发现很多人这个点6653都错成9621.为什么?
#1 lic@2009-05-29 00:34:00
回复 删除
我也一样....
#2 Wych@2009-06-01 02:04:00
回复 删除
顶一下,同感,难道又是数据问题?
#3 Wych@2009-06-01 05:33:00
回复 删除
把我的代码发一下,很简单请大家找找错,错误如题:

program rq106(input,output);

var i,j,k,n,m,ans,s :longint;

a :array [0..250,0..250] of longint;

begin

fillchar(a,sizeof(a),0);

readln(n);

for i:=1 to n do

begin

for j:=1 to n do

begin

read(m);

a[i,j]:=a[i,j-1]+m;

end;

readln;

end;

ans:=0;

for i:=1 to n do

for j:=1 to i do

begin

s:=0;

for k:=1 to n do

begin

s:=s+a[k,i]-a[k,j-1];

if s>ans then ans:=s;

if s<0 then s:=0;

end;

end;

write(ans);

end.

#4 asce@2009-07-04 22:41:00
回复 删除
是数据有点问题,就是读入的时候如果不加readln就能ac,加了就错最后一个点.可能是大数据的问题吧.

总之把读入改成for i:=1 to n do

for j:=1 to n do read(a[i,j]);就行了

#5 willlai@2010-07-05 07:12:00
回复 删除
顶楼上
#6 ahfy_zyt@2011-08-26 05:48:00
回复 删除
我也一样,顶楼上

(我还没有试,不知道对不对,这个是不是数据问题?)

#7 垃圾桶@2011-10-05 19:46:00
回复 删除
这个..诡异啊..readln也会有问题?
#8 LbyG@2011-10-31 04:34:00
回复 删除
= =
#9 宇轩@2012-08-06 01:13:00
回复 删除
谢谢asce大神,过了
#10 jifaley@2013-11-03 00:20:53
回复 删除
谢谢asce大神,过了

但是为什么会出这样的问题。。。。

查看更多回复
提交回复