| 比赛 | NOIP2008集训模拟3 | 评测结果 | AAAAAAAAAA |
|---|---|---|---|
| 题目名称 | 硬币游戏 | 最终得分 | 100 |
| 用户昵称 | name:弓虽 | 运行时间 | 0.000 s |
| 代码语言 | Pascal | 内存使用 | 0.00 MiB |
| 提交时间 | 2008-11-12 10:19:37 | ||
program coins(input,output);
var
i,j,k:longint;
n:array[1..1000010] of longint;
begin
assign(input,'coins.in');
assign(output,'coins.out');
reset(input);
rewrite(output);
readln(k) ;
for i:=1 to k do
readln(n[i]);
for i:=1 to k do
begin
if (n[i]<3) and (n[i]>=1) then writeln('Alice')
else writeln('Bob')
end;
close(input);
close(output);
end.