var i,k,count,n:integer;
begin
readln(n);
for i:= 1 to n do
begin
count:=0;
for k:= 1 to i do
if i mod k = 0 then
if (i div k = 1) or (i div k = i) then
count:= count+1
else count:=3;
if count=2 then
writeln(i);
end;
end.