Задать вопрос
28 августа, 20:11

Дано число n. Найти все его делители.

+2
Ответы (1)
  1. 29 августа, 00:02
    0
    Uses crt;

    var a, i:integer;

    begin

    readln (a) ;

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

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

    writeln (a) ;

    end.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Дано число n. Найти все его делители. ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы