Непарні дільники
Вивести
всі непарні дільники натурального числа 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.
Немає коментарів:
Дописати коментар