Напишите программу, которая выводит все простые числа в диапазоне от 2 до N включительно ( 2 ≤ N ≤ 100000
Ответы
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Популярные вопросы в разделе
Какой метод применяется для сглаживания графиков функции?
Автор: Инна_Nina1182
9999999999999999999999999
Автор: Оксана Анна
Где хранит данные исполнитель компьютера для решения задач
Автор: amayonova
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.