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

Злата168 Злата168    3   28.02.2019 03:40    1

Ответы
marinichnatash marinichnatash  23.05.2020 16:28

program aaa;
  var d, n : integer;
begin
 write ('введите число N-');
 readln (n);
 writeln('Делители числа: ');
 for d :=1 to n do
  if n mod d = 0 then writeln (d)
end.

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