program Dzielniki;

var
n, i : longint;

begin
    readln(n);

    for i:=1 to n do
    begin
        if (n mod i) = 0 then
        begin
            Write(i);
        end;
    end;

readln;
end.