Ответы
Ответ дал:
0
Паскаль
var a,i:integer;
begin
readln(a);
writeln;
for i:=1 to a do
if (a mod i=0) then writeln (i);
end.
Похожие вопросы
4 года назад
4 года назад
6 лет назад
6 лет назад
7 лет назад
7 лет назад
7 лет назад