x, y, d, nrd, ok naturale
ok <- 0
citeste x
y <- x
cat timp ok=0 executa
{
nrd <- 0
pentru d <- 2, x/2 executa
daca x%d==0 atunci nrd <- nrd + 1
daca nrd==0 atunci ok <- 1
altfel x <- x - 1
}
scrie x, ' '
ok <- 0
cat timp ok=0 executa
{
nrd <- 0
pentru d <- 2, y/2 executa
daca y%d==0 atunci nrd <- nrd + 1
daca nrd==0 atunci ok <- 1
altfel y <- y + 1
}
scrie y
nu stiu cat de eficient e, am facut o in graba, am vazut ca functioneaza cand introduci numere care nu sunt prime iar daca bagi numere prime le afiseaza pe ele insusi deci cam am indoieli
