Перевести с языка 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.