比赛 NOIP2008集训模拟3 评测结果 AAAAAAAAAA
题目名称 硬币游戏 最终得分 100
用户昵称 Achilles 运行时间 0.000 s
代码语言 Pascal 内存使用 0.00 MiB
提交时间 2008-11-12 10:14:14
显示代码纯文本
program coins;
var
  i,n,t:longint;
begin
  assign(input,'coins.in');
  assign(output,'coins.out');
  reset(input);
  rewrite(output);
  readln(n);
  for i:=1 to n do
  begin
    readln(t);
    if t>=3 then writeln('Bob') else writeln('Alice');
  end;
  close(input);
  close(output);
end.