Очень важно!! помогите пожалуйста
задача по информатике
в паскале
*с клавиатуры вводится натуральное число n из промежутка от 0 до 100. Найти и вывести на экран все простые числа от 0 до n*
Var i,n:integer;
begin
writeln(введите число от 0 до 100);
readln(n);
for i:=1 to n do begin
writeln(i);
end;
end.
Оцени ответ
