信息学奥赛普及组第3题---守望者的逃离 - 辕门射虎


	阿巽


	★

组别	羽林都尉
级别	骠骑将军
功绩	107
帖子	9706
编号	47733
注册	2005-9-3
来自	善化
家族	慕容世家

发表于 2007-12-5 21:20 资料个人空间短消息看全部作者

program escape(input,output);
var

m,ss,t,ma,ta,tt,i:longint;
s:longint;

begin

assign(input,'escape.in');
assign(output,'escape.out');

reset(input);rewrite(output);
readln(m,s,t);
ss:=0;tt:=0;
ta:=m div 10;ma:=m mod 10;
if ta>=t then
while (s>ss) and (tt<t) do
begin
ss:=ss+60;inc(tt);
end else
begin ss:=ss+60*ta;tt:=tt+ta;end;
while (s-ss>0) and ((t-tt)>0) do
begin
if (s-ss<=17) then begin ss:=ss+17;inc(tt);continue;end;
if ((s-ss>17)and(s-ss<=34)and (ma<6)) then begin ss:=ss+17;inc(tt);continue;end;
if ((s-ss>34)and (s-ss<=51)and (ma<2)) then begin ss:=ss+17;inc(tt);continue;end;
if ((s-ss>51)and (s-ss<=68)) then begin ss:=ss+17;inc(tt);continue;end;
if ((t-tt<7) and (ma<2)) or ((t-tt<3) and ((ma>1) and (ma<=5)))then

repeat ss:=ss+17;inc(tt) until (s-ss<=0) or ((t-tt)<=0) else
begin
repeat ta:=(ma+4)div 10;inc(tt);ma:=(ma+4)mod 10;until ta=1;
ss:=ss+60;inc(tt);
end;
end;
if s-ss<=0 then
begin writeln('Yes');writeln(tt); end
else begin writeln('No');writeln(ss); end;
close(input);close(output);
end.

本帖最近评分记录

青木风亮

2007-12-5 22:30

+50

go on!

[广告] 《精忠报国岳飞传完整版》火热发布