program cek_prima;
var
n, i,k,j: integer;
prima : boolean;
begin
readln(k);

for j:= 1 to k do begin
readln(n);
prima := true;
 if n<2 then prima := false else
begin
for i := 2 to n div 2 do
if n mod i=0 then begin prima := false; break; end; end;

if prima = true then
writeln('YA') else
writeln('BUKAN');
end;
end.