记录编号 2680 评测结果 AAAAAAAAAA
题目名称 [NOIP 2007]守望者的逃离 最终得分 100
用户昵称 Gravatar苏轼 是否通过 通过
代码语言 Pascal 运行时间 0.036 s
提交时间 2008-09-24 20:18:52 内存使用 0.11 MiB
显示代码纯文本
program escape;

var m,s,ss,t,tt:longint;
    txt:text;

begin
 assign(txt,'escape.in');
 reset(txt);
 readln(txt,m,s,t);
 close(txt);

 ss:=s;
 tt:=t;
 repeat
  if m>=10 then
  begin
   dec(tt);
   ss:=ss-60;
   m:=m-10;
  end else
   if ss<=34 then begin ss:=ss-17; tt:=tt-1; end else
    if (ss<51)and(m<6) then begin ss:=ss-17; tt:=tt-1; end else
     if (ss<68)and(m<2) then begin ss:=ss-17; tt:=tt-1; end else
      if (tt=1)or(tt=2)and(m<6)or(tt=3)and(m<2) then begin ss:=ss-17; tt:=tt-1; end else
       begin m:=m+4; tt:=tt-1; end;

 until (ss<=0) or (tt=0);

 assign(txt,'escape.out');
 rewrite(txt);

 if ss>0 then
 begin
  writeln(txt,'No');
  writeln(txt,s-ss);
 end else
 begin
  writeln(txt,'Yes');
  writeln(txt,t-tt);
 end;


 close(txt);
end.