Перевести с языка Pascal ** язык C. k:=0;for var i:=2 to round(sqrt(N)) do // если число...

0 голосов
61 просмотров

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

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

if k>0 then
writeln('Число ',N,' простое')
else writeln('Число ',N,' составное');
end.


Информатика (77 баллов) | 61 просмотров
0

На простоту кое-как по другому проверяют

0

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.

Дан 1 ответ
0 голосов
Правильный ответ

#include
#include

int main(void) {
 int n, k=0;
 scanf("%d",&n);
 for (int i=2; i<=round(sqrt(n)+0.5); i++)<br>   if (n % i == 0) { k++; break; }
 if (k==0) printf("Число %d простое",n);
 else printf("Число %d составное",n);
 return 0;
}

Пример:
53
Число 53 простое

(194k баллов)