prime number v.2

program lol;
var
a,i:integer;
begin
readln(a);
for i:=1 to a do
begin
if (a mod i) = 0 then
write(i,' ');
end;
end.