Напишите программу, которая выводит все простые - вопрос №166057532 от pankewitchkati 25.02.2020 06:47

Question

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

pankewitchkati · Answer

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....