👤

AaSe citeste un numar natural n. Sa se verifice daca n este prim sau nu.
E urgent. In pascali


Răspuns :

Răspuns:

read(nr);

ok := true;

for i := 2 to nr-2 do

    if nr mod i = 0 then

         ok := false;

if ok = true then

    write("Numarul ", nr, " este prim")

else  

    write("Numarul ", nr, " NU este prim");

Explicație: