Предмет: Информатика,
автор: flappykiw1i
Напишите программу, которая выводит все простые числа в диапазоне от 2 до N включительно ( 2 ≤ N ≤ 100000 ).
renat8059:
Тебе на какой платформе?
Ответы
Автор ответа:
1
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.
Похожие вопросы
Предмет: Математика,
автор: Аноним
Предмет: Физика,
автор: denkonko01SCJOIVJOI
Предмет: Математика,
автор: Пашок32
Предмет: Математика,
автор: vizelzeg
Предмет: Математика,
автор: aliganrus