最大连续数列的和-SSL 1461

Description　求最大连续子序列的和Input　第一行输入n(n<=500),第二行为n个以空格分开的整数(-1000到1000之间)；Output　　该序列中最大的连续子序列的和Sample Input　６　　1 2 -5 6 7 8Sample Output　　21题解：这道题用动态规划。 if t>a[i-1]+t then a[i]:=t else a[i]:=a[i-1]+t;var a:array[-1..1000] of longint;    max,n,t,i:longint;begin  readln(n);  for i:=1 to n do  begin    read(t);    if t>a[i-1]+t then a[i]:=t else a[i]:=a[i-1]+t;  end;  for i:=1 to n do  if a[i]>max then max:=a[i];  writeln(max);end.