洛谷 P1115 最大字段和

题目描述

给出一段序列，选出其中连续且非空的一段使得这段和最大。

输入输出格式

输入格式：
输入文件maxsum1.in的第一行是一个正整数N，表示了序列的长度。

第2行包含N个绝对值不大于10000的整数A[i]，描述了这段序列。

输出格式：
输入文件maxsum1.out仅包括1个整数，为最大的子段和是多少。子段的最小长度为1。

输入输出样例

输入样例#1：
7
2 -4 3 -1 2 -4 3
输出样例#1：
4
说明

【样例说明】2 -4 3 -1 2 -4 3

【数据规模与约定】

对于40%的数据，有N ≤ 2000。

对于100%的数据，有N ≤ 200000。

模拟：
1.如果a[i]+a[i-1]>=0,就继续做。
2.如果a[i]+a[i-1]<0，就自己重新为一个序列头。
3.由于可能出现负数，所以max初值不能是0。
4.由于可能全部 都是负数，最大字段和为负数，所以发现a[i]+a[i-1]<0时，先别着急清零，用a[i]与max进行完比较再清零。
时间复杂度：O（n)

var
    x,i,n,now,max:longint;
begin
    readln(n);
    max:=-maxlongint;
    for i:=1 to n do
        begin
            read(x);
            if now<0 then now:=0;
            if now+x>=0 then now:=now+x
                        else now:=x;
            if now>max then max:=now;
        end;
    writeln(max);
end.