#5 995541152@2012-06-01 23:21:00
26113
回复
删除
[quote][url=/Discuss_Show.asp?DID=850]原帖[/url]由 [i]日月双蚀[/i] 于 2008-4-27 18:02:00 发表
数据明明告诉你水漂可以无限跳, 怎么又说只能跳2次- -...[/quote]
就像某游戏一样,一开始你速度慢时,你一碰到别人就悲剧,到后面速度上去以后,别人一碰到你就悲剧
#6 csh123456@2013-01-25 21:01:00
29190
回复
删除
过不了,求破!!!
program project1;
var i,j,k,n,max,st,en:longint;
a:array[0..10000,0..10000]of longint;
begin
max:=0;
readln(n);
for i:=1 to n do
read(a[i-1,i+1]);
readln;
for i:=2 to n-2 do
for j:=i+1 to n-1 do
a[i-1,j+1]:=a[i,j]+a[i-1,i+1]+a[j-1,j+1];
for i:=1 to n-1 do
for j:=2 to n do
if a[i,j]>max then
begin
max:=a[i,j];
st:=i;
en:=j;
end;
writeln(st+1,' ',en-1);
writeln(max);
readln;
end.