Дано натуральное число N. Определить К - количество делителей этого числа, не превышая его ( N = 12, его делители 1, 2, 3, 4, 6, К = 5 )
Дано натуральное число N. Определить К - количество делителей этого
числа, не превышая его ( N = 12, его делители 1, 2, 3, 4, 6, К = 5 )
Гость
Ответ(ы) на вопрос:
Гостьuses crt;
var n,i,k:integer;
begin
read(n);
for i:=1 to n-1 do
if i mod k=0 then
k:=k+1;
writeln(k);
end.
Не нашли ответ?
Похожие вопросы