Cod sursa(job #612324)
Utilizator | Data | 6 septembrie 2011 20:35:54 | |
---|---|---|---|
Problema | Jocul NIM | Scor | 100 |
Compilator | fpc | Status | done |
Runda | Arhiva educationala | Marime | 0.41 kb |
program Nim;
var t,n,x,S:longint;
i,j:longint;
begin
assign(input,'nim.in');
reset(input);
assign(output,'nim.out');
rewrite(output);
readln(t);
for i:=1 to t do
begin
readln(n);
S:=0;
for j:=1 to n do
begin
read(x);
S:=S xor x;
end;
if S>0 then writeln('DA')
else writeln('NU');
readln;
end;
close(input);
close(output);
end.