记录编号	201162	评测结果	WWWWWWAAWW
题目名称	[ZLXOI 2015][异次元圣战II]燃灵之链	最终得分	20
用户昵称	ywx	是否通过	未通过
代码语言	Pascal	运行时间	0.923 s
提交时间	2015-10-29 22:54:36	内存使用	76.71 MiB

uses math;
var i,j,n,k:longint;
    f:array[0..10000,0..1000,0..1] of longint;
    a:array[0..10000] of longint;
begin
  assign(input,'KPengshuangcang.in');
  assign(output,'KPengshuangcang.out');
  reset(input);
  rewrite(output);
  readln(n,k);
  for i:=1 to n do
  read(a[i]);

  fillchar(f,sizeof(f),200);

   for i:=0 to k do
   begin
   f[1,i,1]:=a[1];
   f[1,i,0]:=0;
   end;

  for i:=2 to n do
    for j:=1 to k do
    begin
      f[i,j,1]:=max(f[i-1,j,1]+a[i],f[i-1,j-1,0]+a[i]);
        f[i,j,0]:=max(f[i-1,j,0],f[i-1,j,1]);
    end;

   writeln(max(f[n,k,0],f[n,k,1]));

   close(input);
   close(output);
end.