9 класс. Паскаль. тема "вложенные циклы"
Var
n, i : integer;
begin
readln(n);
for i := 1 to n do
if n mod i = 0 then
writeln(i+*+(n div i)+=+n);
end.
Оцени ответ
Вход
Регистрация
Задать вопрос
Var
n, i : integer;
begin
readln(n);
for i := 1 to n do
if n mod i = 0 then
writeln(i+*+(n div i)+=+n);
end.