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