Задать вопрос
3 ноября, 13:52

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

+1
Ответы (1)
  1. 3 ноября, 15:06
    0
    Uses crt;

    var n, i:integer;

    begin

    readln (n) ;

    for i:=1 to (n div 2) do

    if n mod i=0 then writeln (i) ;

    writeln (n) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Найти все делители натурального числа n ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы