непонел функции являится ли n первым числом Опции

[maksimla]

написана функция,которая проверяет дано чесло n(n>=2)есть первичным
function Pirminis (n: integer): boolean;
var j: integer;
begin
if n = 2
then Pirminis := true
else if not odd(n)
then pirminis := false
else begin
j := ... ;
while (n mod j <> 0) ... (sqr (j) <= n) do
j := j + 2;
pirminis := sqr(j) ... n
end
end;
вместо точек надо вставить нужную операцию.

непонял я что это за первичное или первое число обесните пожалста

[maksimla]

ну я всеравно немогу найти эти числа в последнем надо вставить знак и все
а почему j возводится в квадрат????

[andriano]

а почему j возводится в квадрат????

Если число составное, оно имеет минимум два делителя (кроме 1 и самого себя), причем хотя бы один из них меньше или равен корню из исследуемого числа. Поэтому если среди чисел меньших корня делитель не обнаружен, дальше проверять нет смысла.