Помогите, пожайлуста, составить программу на паскале.
Вывести на экран все простые числа в диапазоне от 2 до N.
Program Pr1;uses crt;var i,n:integer;beginclrscr;readln(n);i:=2;while i<=n do begin writeln(i); i:=i+1; end;end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
Program Pr1;
uses crt;
var i,n:integer;
begin
clrscr;
readln(n);
i:=2;
while i<=n do begin
writeln(i);
i:=i+1;
end;
end.