Азима
Опубликовано 6 лет назад по предмету Информатика от Азима


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

  1. Ответ
    Ответ дан ali07

    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.

     

Не тот ответ, который вам нужен?
Найди нужный
Задай вопрос

Лучшие за месяц