Найти все делители натурального числа n

ник230903 ник230903    3   28.02.2019 03:40    1

Ответы
Пульпа Пульпа  23.05.2020 16:28

program xxx;

  var i, n : integer;

begin

 write ('введите число N-');

 readln (n);

 writeln('Делители числа: ');

 for i :=1 to n do

   if n mod i = 0 then writeln (i)

end.

 

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика