Программа на языке паскаль. Дано натуральное N . Определить, является ли оно простым.

Предыдущий
вопрос Следующий
вопрос

program PrimeNumber;

va
N, i: Integer
isPrime: Boolean;

begi
isPrime := true;

write('Enter a natural number N: ')
readln(N);

if N <= 1 the
isPrime := fals
els
begi
for i := 2 to N div 2 d
begi
if N mod i = 0 the
begi
isPrime := false
break
end
end
end;

if isPrime the
writeln(N, ' is a prime number'
els
writeln(N, ' is not a prime number');

end.