Задать вопрос
23 мая, 04:50

Помогите решить задачу по информатике, по формуле Паскаля. Нужно найти числа, делители числа n

+2
Ответы (1)
  1. 23 мая, 05:16
    0
    Procedure factorize (n: longint) ;

    var divisor: longint;

    begin

    divisor : = 2;

    while divisor * divisor < = n do

    if n mod divisor = 0 then

    begin

    n : = n div divisor;

    writeln (divisor) ;

    end

    else inc (divisor) ;

    if n 1 then writeln (n) ;

    end;

    var n: longint;

    begin

    readln (n) ;

    factorize (n) ;

    end.
Знаете ответ?
Сомневаетесь в ответе?
Найдите правильный ответ на вопрос ✅ «Помогите решить задачу по информатике, по формуле Паскаля. Нужно найти числа, делители числа n ...» по предмету 📘 Информатика, а если вы сомневаетесь в правильности ответов или ответ отсутствует, то попробуйте воспользоваться умным поиском на сайте и найти ответы на похожие вопросы.
Смотреть другие ответы
Похожие вопросы по информатике
1. (x делится без остатка на 2 и на 3) записать на языке паскаля. 2. (х не делится на 5) записать на языке паскаля. 3. (величина х не кратна 3) записать на языке паскаля.
Ответы (1)
Помогите решить задачу по информатике "циклы" По теореме Паскаля. Числа от 33 до 555 которые кратны 13
Ответы (1)
Помогите решить задачу по информатике (записать на языке Паскаля) с объяснениями поэтапно Создать массив а из десяти целых чисел, принадлежащих промежутку [0;
Ответы (1)
Два множества: первое все простые делители некоторого целого числа N и второе все простые делители того же числа. Вывести на экран делители которые не являются простыми. (Паскаль)
Ответы (1)
Ребят помогите, учитель по информатике сказал, что есть какой-то сайт, на котором проходит всероссийский конкурс по информатике, а как называется не помню, знаю только что сайт зелёный и по моему паук есть
Ответы (1)