Предмет: Информатика, автор: maksfwrwe

Вводится число n, найдите все его делители. паскаль

Ответы

Автор ответа: Аноним
0
Var
n,i:integer;
Begin
Write('n = ');ReadLn(n);
For i:= 1 to n do
    if n mod i = 0 then Write(i,' ')
End.
Похожие вопросы
Предмет: Математика, автор: dashenka748
Предмет: Українська мова, автор: Аноним
Предмет: Литература, автор: оылвладпбпбплплд