Найдите количество делителей натурального числа n
Найдите количество делителей натурального числа n
Гость
Ответ(ы) на вопрос:
ГостьПрограмма на Паскале: program xxx; var i, n, k : integer; begin write('введите число n-'); readln(n); k=0; for i:=1 to n do if n mod i = 0 then k:=k+1; write('количество делителей = ', k); readln end.
Не нашли ответ?
Похожие вопросы