total:=0; readln(n,m); a[0]:=0;b[0]:=0; for i:=1 to n do begin read(x);
a[i]:=a[i-1]+x; //累加前缀和 b[i]:=a[i]-i*m; //根据变形求b 序列 end;
msort(0,n); //左端点包括0 writeln(total); //输出方案 end; begin init; main; terminate; end.
输入 15 8
2 3 5 6 7 9 3 11 12 8 10 18 28 19 17 输出 73 输入 25 14
3 6 15 4 8 24 88 78 99 56 14 21 11 90 80 68 55 32 19 39 69 32 44 51 48 输出 305 输入 40 24
3 1 10 20 4 16 7 9 99 89 19 9 6 16 86 56 66 27 17 30 40 11 21 15 35 55 5 8 18 88 78 68 58 13 33 23 93 98 99 39 输出 724