【Description】
在一年前赢得了小镇的最佳草坪比赛后,FJ变得很懒,再也没有修剪过草坪。现在,新一轮的最佳草坪比赛又开始了,FJ希望能够再次夺冠。
然而,FJ的草坪非常脏乱,因此,FJ只能够让他的奶牛来完成这项工作。FJ有N(1 <= N <= 100,000)只排成一排的奶牛,编号为1…N。每只奶牛的效率是不同的,奶牛i的效率为E_i(0 <= E_i <= 1,000,000,000)。
靠近的奶牛们很熟悉,因此,如果FJ安排超过K只连续的奶牛,那么,这些奶牛就会罢工去开派对:)。因此,现在FJ需要你的帮助,计算FJ可以得到的最大效率,并且该方案中没有连续的超过K只奶牛。
【Input】
* 第一行:空格隔开的两个整数N和K
* 第二到N+1行:第i+1行有一个整数E_i
【Output】
* 第一行:一个值,表示FJ可以得到的最大的效率值
【Sample Input】
5 2
1
2
3
4
5
【Sample Output】
12
【Hint】
输入解释:
FJ有5只奶牛,他们的效率为1,2,3,4,5。他们希望选取效率总和最大的奶牛,但是他不能选取超过2只连续的奶牛
FJ可以选择出了第三只以外的其他奶牛,总的效率为1+2+4+5=12。
【Source】
Gold
【Solution】
单调队列。记f[i]为前i个连续k+1个中至少一个没选的最小值,队列中f值递增,下标递增。最后拿总和减去队头即可。
代码如下:
/**************************************************************
Problem: 2442
User: llgyc
Language: Pascal
Result: Accepted
Time:192 ms
Memory:2568 kb
****************************************************************/
const maxn = 100000+5;
var n,k,head,tail,i,j,x :longint;
tot :int64;
queue,code,f :array[0..maxn] of int64;
begin
readln(n,k);
for i:=1 to n do begin
readln(x); tot:=tot+x; f[i]:=queue[head]+x;
while (head<=tail) and (f[i]<queue[tail]) do dec(tail);
inc(tail); queue[tail]:=f[i]; code[tail]:=i;
while (code[head]<i-k) do inc(head);
end;
writeln(tot-f[code[head]]);
end.