Составьте программу, находящую количество делителей натурального числа N.

Указание. Число х является делителем числа N, если выполняется условие N mod x=0.

Это паскаль

Question

Ардалион

3 ноября, 03:27

+2

Ответы (1)

Знаете ответ на вопрос?

Ируша · Answer 1

Uses crt;

var

a, b, k:integer;

Begin

read (a) ;

for b: = 1 to A do

if (a mod b=0) then k:=k+1;

writeln (k) ;

End.

Составьте программу, находящую количество делителей натурального числа N.Указание. Число х является делителем числа N, если выполняется условие N mod x=0.Это паскаль