Непарні дільники

Вивести всі непарні дільники натурального числа n.
Вхідні дані
Одне натуральне число n (n  100000).
Вихідіні дані
Вивести всі непарні дільники числа n. Кожний дільник виводити в окремому рядку.


Вхідні дані
12
 
Вихідні дані
1
3



program neparni;
var i,n : int64;
BEGIN
readln(n);
i:=1;
while i<=n do begin
 if (n mod i = 0) and odd(i) then writeln(i);
 i:=i+1;
end;

END.

Немає коментарів:

Дописати коментар