program one;
var
  n: longint;
  x, y: longint;
  number: longint;


function prime(a: longint): boolean;
  var
    i: longint;
  begin
    if a < 2 then
      begin
        prime := false;
        exit;
      end;

    if a = 2 then
      begin
        prime := true;
        exit;
      end;

    if a mod 2 = 0 then
      begin
        prime := false;
        exit;
      end;

    i := 3;
    while i*i<=a do
      begin
        if a mod i = 0 then
          begin
            prime := false;
            exit;
          end;
        inc(i);
      end;
    prime := true;
  end;

procedure work;
  begin
    number := 0;

    for x := 1 to n do
      begin
        if (n mod x = 0) and (prime(x)) then
          inc(number);
      end;

    if number = 3 then
      writeln('valid')
    else
      writeln('not');
  end;

begin

  assign(input, 'DATA1.txt');
  reset(input);
  assign(output, 'OUT1.txt');
  rewrite(output);

  for y := 1 to 5 do
    begin
  readln(n);

  work;
  end;
  readln;
end.
