profile
Опубликовано 5 лет назад по предмету Информатика от t4hunaTat2ijhU

ПАСКАЛЬ
Напишите программу для нахождения всех собственных делителей целого числа N ( т.е. Всех чисел , меньших N , на которые оно делится).

  1. Ответ
    Ответ дан Nobunaga
    var n,i:integer;
    begin;
    readln(n);
    for i:=1 to n-1 do
    if n mod i=0 then writeln(i);
    end.
Самые новые вопросы