jzoj 1899. 【2014.8.17NOIP普及组模拟】接苹果

1899. 【2014.8.17NOIP普及组模拟】接苹果(bcatch.pas/c/cpp) 
(File IO): input:bcatch.in output:bcatch.out

时间限制:  1000 ms  空间限制:  128000 KB  具体限制  

Goto ProblemSet

题目描述

    很少有人知道奶牛爱吃苹果。农夫约翰的农场上有两棵苹果树（编号为1和2），每一棵树上都长满了苹果。奶牛贝茜无法摘下树上的苹果，所以她只能等待苹果从树上落下。但是，由于苹果掉到地上会摔烂，贝茜必须在半空中接住苹果（没有人爱吃摔烂的苹果）。贝茜吃东西很快，所以她接到苹果后仅用几秒钟就能吃完。

​    每一分钟，两棵苹果树其中的一棵会掉落一个苹果。贝茜已经过了足够的训练，只要站在树下就一定能接住这棵树上掉落的苹果。同时，贝茜能够在两棵树之间快速移动（移动时间远少于1分钟），因此当苹果掉落时，她必定站在两棵树其中的一棵下面。此外，奶牛不愿意不停地往返于两棵树之间，因此会错过一些苹果。

​    苹果每分钟掉落一个，共T（1<=T<=1000）分钟，贝茜最多愿意移动W（1<=W<=30）次。现给出每分钟掉落苹果的树的编号，要求判定贝茜能够接住的最多苹果数。开始时贝茜在1号树下。

f[i,j]表示第i分钟移动j次的最大值。

const
  maxn=1000;
var
  f:array[0..maxn,-1..30] of longint;
  a:array[0..maxn] of longint;
  i,j,k,max,n,w:longint;

function maxf(x,y:longint):longint;
begin
  if x>y then exit(x) else exit(y);
end;

begin
  assign(input,'bcatch.in'); reset(input);
  assign(output,'bcatch.out');rewrite(output);
  readln(n,w);
  for i:=1 to n do
    readln(a[i]);
  for i:=1 to n do
    begin
      f[i,0]:=a[i] mod 2;
      for j:=0 to w do
        begin
          f[i,j]:=maxf(f[i-1,j],f[i-1,j-1]);
          if j mod 2=(a[i]+1) mod 2
            then k:=1 else k:=0;
          f[i,j]:=f[i,j]+k;
        end;
    end;
  for i:=0 to w do
    if f[n,i]>max then max:=f[n,i];
  writeln(max);
  close(input);close(output);
end.