program prime;

const
 max=500000000;

var
 i,j:integer;
 n:array[2..max] of integer;
 io:text;
 
begin

 for i:= 2 to max do
  n[i]:=1;
 
 assign(io,'/dev/tty'); rewrite(io);
 
 for i:= 2 to max do begin
 
  if i mod 100 = 0 then write(io,i:10,"\r");
  
  if n[i] = 1 then begin
   j:=i;
   repeat
    n[j]:=i;
    inc(j,i);
   until j>max;
  end;
 end;
  
 writeln(io); close(io);
 
 for i := 2 to max do
  if n[i]=i then writeln(i:10);
  
end.