点这里查看
讨论 / 最后一个点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大神，过了

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

查看更多回复
提交回复