Глобус24
var i,n :integer;
Begin
read(n);
for i:= 1 to n do
if n mod i = 0 then
writeln(i);
End.
Ваш адрес email не будет опубликован. Обязательные поля помечены *
Комментарий
Имя *
Email *
Δ