program posloup;
const
   DIF = 1;
var
   n:integer;
function prvo(n:integer):string;
var
  i:integer;
begin
  prvo := 'N';
  for i:=1 to (n-2) do
  begin
    if (n mod (i+1) = 0) then
      prvo := 'A';
  end;
end;
begin
  n := 0;
  while n <= 100 do begin
    writeln(n:4,prvo(n):8);
    n := n + DIF
  end;
  readln;
end.