【NOIP2007】第三题·守望者的逃离

题目描述 Description

恶魔猎手尤迪安野心勃勃，他背叛了暗夜精灵，率领深藏在海底的娜迦族企图叛变。守望者在与尤迪安的交锋中遭遇了围 杀，被困在一个荒芜的大岛上。为了杀死守望者，尤迪安开始对这个荒岛施咒，这座岛很快就会沉下去。到那时，岛上的所有人都会遇难。守望者的跑步速度为 17m/s，以这样的速度是无法逃离荒岛的。庆幸的是守望者拥有闪烁法术，可在1s内移动60m，不过每次使用闪烁法术都会消耗魔法值10点。守望者的魔 法值恢复的速度为4点/s，只有处在原地休息状态时才能恢复。

现在已知守望者的魔法初值M，他所在的初始位置与岛的出口之间的距离S，岛沉没的时间T。你的任务是写一个程序帮助守望者计算如何在最短的时间内逃离荒岛，若不能逃出，则输出守望者在剩下的时间内能走的最远距离。注意：守望者跑步、闪烁或休息活动均以秒(s)为单位，且每次活动的持续时间为整数秒。距离的单位为米(m)。

输入描述 Input Description

仅一行，包括空格隔开的三个非负整数M, S, T。

输出描述 Output Description

包含两行：

第1行为字符串“Yes”或“No”（区分大小写），即守望者是否能逃离荒岛。

第2行包含一个整数。第一行为“Yes”（区分大小写）时表示守望者逃离荒岛的最短时间；

第一行为“No”（区分大小写）时表示守望者能走的最远距离。

样例输入 Sample Input

39 200 4

样例输出 Sample Output

No

197

代码：

 var
  a:array[0..300000] of longint;
  m,s,t,i:longint;

function max(a,b:longint):longint;
 begin 
  if a>b then exit(a);
  exit(b);
end; 
begin
  readln(m,s,t);
  a[0]:=0;
  for i:=1 to t do
     if m>=10 then
     begin
       a[i]:=a[i-1]+60;
       m:=m-10;
     end
     else
      begin
         a[i]:=a[i-1];
         m:=m+4;
      end;
   for i:=1 to t do
     begin
      a[i]:=max(a[i],a[i-1]+17);
      if a[i]>=s then
         begin
          writeln('Yes');
          writeln(i);
          halt;
      end;
      end;
   writeln('No');
   writeln(a[t]);
 end.

转载于:https://www.cnblogs.com/kairos2000/p/4783765.html