dentob72
?>

Напишите программу, которая выводит все простые числа в диапазоне от 2 до N включительно ( 2 ≤ N ≤ 100000

Информатика

Ответы

badalovao256

var

N,i,k,x:integer;

begin

readln(N);

for i:=2 to N do

begin

 x:=0;  

for k:=2 to trunc(sqrt(i)) do

   if i mod k=0 then  

   x:=1;

if x=0 then  

write(i,' ');

end;

end.

Ответить на вопрос

Поделитесь своими знаниями, ответьте на вопрос:

Напишите программу, которая выводит все простые числа в диапазоне от 2 до N включительно ( 2 ≤ N ≤ 100000
Ваше имя (никнейм)*
Email*
Комментарий*

Популярные вопросы в разделе

kmb1960679
optikaleks7
patersimon1
Волков1968
kassel1b
market-line5260
Лихачев Полина1978
borodin
dimalihachew
bochkarevazh
rublevaoe392
rigina82
gassvetlana
ilysozkn27
ipeshindina236