У скольких чисел от 1 до 2030 включительно ровно четыре натуральных делителя? (Включая 1 и само число).
У скольких чисел от 1 до 2030 включительно ровно четыре натуральных делителя? (Включая 1 и само число).
Гость
Ответ(ы) на вопрос:
Гостьvar n,k,i,j:integer;
begin
n:=0;
for i:=3 to 2030 do
begin
k:=2;
for j:=2 to i div 2 do
if i mod j = 0 then k:=k+1;
if k=4 then n:=n+1;
end;
writeln('n = ',n);
end.
Результат:
n = 573
Не нашли ответ?
Похожие вопросы