太空

看不懂题目啊，囧

太简单了……最基本的DP……

通过率还那么低……

莫非是大牛看不上？

很好很强大

终于40分了 浪费了我n多的时间和通过率

地心。。。

编译通过...

├ 测试数据 01：答案正确... 0ms

├ 测试数据 02：答案正确... 0ms

├ 测试数据 03：答案正确... 0ms

├ 测试数据 04：答案正确... 0ms

├ 测试数据 05：答案正确... 41ms

├ 测试数据 06：答案正确... 25ms

├ 测试数据 07：答案正确... 0ms

├ 测试数据 08：答案正确... 212ms

├ 测试数据 09：答案正确... 119ms

├ 测试数据 10：答案正确... 0ms

---|---|---|---|---|---|---|---|-

Accepted 有效得分：100 有效耗时：397ms

终于过了！！！交了6次。。。我的正确率啊。。。。

到现在我还没明白我一开始怎么错的，我去看看我的程序（寒，那还是我写的吗？）

NO.2 又慢了

我第一个AC

来晚了

坑爹的地方很多
有很多要注意
下面是AC程序
var i,j,k,l,n,m,ans:longint;
a,f:array[0..500,0..500] of longint;

function max(a,b:longint):longint;
begin
if a>b then exit(a);
exit(b);
end;

begin
readln(n,m);
for i:=1 to n do
for j:=1 to m do read(a[i,j]);
for i:=0 to n+3 do
for j:=0 to m+3 do f[i,j]:=0-maxlongint shr 1;
f[n+1,m div 2]:=0;
for i:=n downto 1 do
for j:= 1 to m do f[i,j]:=max(f[i+1,j-1],max(f[i+1,j],f[i+1,j+1]))+a[i,j];
for i:=1 to m do if f[1,i]>ans then ans:=f[1,i];
writeln(ans);
end.