var
        i,n,t,m:integer;
begin
        read(n);
        for i:=1 to n do
        if ((i mod 2=0) and (i mod 3=0)) or ((i mod 2=0) and (i mod 5=0)) or ((i mod 2=0) and (i mod 7=0)) or ((i mod 3=0) and (i mod 5=0)) or ((i mod 3=0) and (i mod 7=0)) or ((i mod 5=0) and (i mod 7=0)) then
        writeln(i);
        end.
end.
/**************************************************************
	Problem: 1746
	User: admin
	Language: Pascal
	Result: Wrong Answer
****************************************************************/