program prime;

var
 fin,fout : text;
 i, n : integer;
 b : boolean;

begin
 assign(fin,'in.txt' );
 reset(fin);
 assign(fout,'out.txt' );
 rewrite(fout);
 while not eof(fin) do
  begin
   read(fin,n);
   if n<>1 then
    begin
     b:=true;
     for i:=2 to trunc(sqrt(n)) do
      if n mod i=0 then b:=false;
     if b then write(fout,n,' ' );
    end;
  end;
 close(fin);
 close(fout);
readln;
end.