Ответы
Ответ дал:
0
var i,n :integer;
Begin
read(n);
for i:= 1 to n do
if n mod i = 0 then
writeln(i);
End.
Похожие вопросы
1 год назад
8 лет назад
8 лет назад
8 лет назад