Перевести с языка Pascal на язык C.

k:=0;
for var i:=2 to round(sqrt(N)) do // если число составное, то один из его сомножителей <= sqrt(N) 
if N mod i = 0 then
begin
inc(k);
break;
end;

if k>0 then
writeln('Число ',N,' простое')
else writeln('Число ',N,' составное'); 
end. 
Please enter comments
Please enter your name.
Please enter the correct email address.
You must agree before submitting.

Answers & Comments


Copyright © 2025 SCHOLAR.TIPS - All rights reserved.