现在的位置: 首页 > 综合 > 正文

poj2505

2018年04月26日 ⁄ 综合 ⁄ 共 269字 ⁄ 字号 评论关闭

【题意】

初始为1,两个人轮流乘一个2到9之间的数,谁先大于n谁赢

【输入】

多组数据,每行一个数字n

【输出】

对于每组数据输出Stan赢还是Oille赢

详见数据

program poj2505;
var
  o:int64;
  n:double;
begin
  while not seekeof do
    begin
      read(n);
      o:=1;
      while n>1 do
        begin
          if o=1 then n:=n/9
                 else n:=n/2;
          o:=o xor 1;
        end;
      if o=1  then writeln('Ollie wins.')
             else writeln('Stan wins.');
    end;
end.
【上篇】
【下篇】

抱歉!评论已关闭.