efrei/algorithmique/recursivite/premier.algo

15 lines
335 B
Text

Algorithme : Détermine si un entier N est premier
Début
Fonction EstPremier(N : int, i : int)
Si i = 1
Retourner(Vrai)
Sinon
Si N % i = 0
Retourner(Faux)
Sinon
Retourner(EstPremier(N, i - 1))
FinSi
FinSi
FinFonction
Fin