Вывести ** экран все простые числа от 1 до n. ( РЕШИТ В ПАСКАЛЕ)

Question

Вывести на экран все простые числа от 1 до n. ( РЕШИТ В ПАСКАЛЕ)

Answer 1

Begin
for var i=1 to n do
Writeln(i);
end.