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

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

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

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

题解

  DP。

  开始在1号树下,

代码

var
  b:array[0..1000,0..30] of longint;
  s:array[1..1000] of longint;
  n,m,max:longint;
function main(x,y:longint):longint;
begin
  if y mod 2=0 then
    begin
      if s[x]=1 then
        exit(1)
      else exit(0)
    end
  else
    if s[x]=1 then
      exit(0)
    else exit(1);
end;
var
  i,j:longint;
begin
  assign(input,'bcatch.in');reset(input);
  assign(output,'bcatch.out');rewrite(output);
  readln(n,m);
  for i:=1 to n do readln(s[i]);
  for i:=1 to n do
    for j:=0 to m do
      begin
        b[i,j]:=b[i-1,j]+main(i,j);
        if j<>0 then
          if b[i,j]<b[i-1,j-1]+main(i,j+1) then
            b[i,j]:=b[i-1,j-1]+main(i,j+1);
      end;
  max:=0;
  for i:=0 to m do
    if max<b[n,i] then max:=b[n,i];
  writeln(max);
  close(input);
  close(output);
end.

评论 2
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值