记录编号 7913 评测结果 AAAAAAAAAA
题目名称 硬币游戏 最终得分 100
用户昵称 Gravatarzpl123 是否通过 通过
代码语言 Pascal 运行时间 0.031 s
提交时间 2008-11-12 14:59:57 内存使用 0.11 MiB
显示代码纯文本
program coins;
var
k,i,x:longint;

begin
assign(input,'coins.in');
reset(input);
assign(output,'coins.out');
rewrite(output);

readln(k);

for i:=1 to k do
 begin
 readln(x);
 if x >=3 then writeln('Bob')
  else writeln('Alice');
 end;

close(input);
close(output);

end.