< >

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

Ответы

Ответ дал: ali07
0

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.

 

Похожие вопросы
Английский язык
2 года назад
помогите составить слова из букв
Русский язык
2 года назад
определите способ связи между следующими предложениями текста: 1 и 2 2 и 3 3 и 4 (1)В деревне у меня сразу же завелись обширные и любопытные знакомства с крестьянами... (2)Сильнее всех моими
Алгебра
7 лет назад
Сколько будет sin²a+cos²a?
Математика
7 лет назад
17/24+8/9*3/32 помогите пожалуйста.
Математика
10 лет назад
мама положила на тарелку абрикосы. После того как брат взял 1/7 часть всех абрикосов, а сестра 1/4 остатка, на тарелке осталось еще 18 абрикосов. Сколько абрикосов положила мама на тарелку?
Математика
10 лет назад
У будинку є 16 трикімнатних квартир,що становить 4/21(ето дробь)кількості всіх квартир у будинку.Скільки в цьому будинку квартир?
Химия
10 лет назад
Пропуская водород над нагретым Fe2O3 цифры-индексы можно получить железо. Вычислите массу железа, если израсходовали 2,24 л. водорода. Выход продукта реакции составляет 95% от теоретически возможного.
Математика
10 лет назад
папа дал в кассу магазина 800 рублей в уплату за 3 рубашки по цене 260 рублей. Сколько сдачи он должен получить?