Accueil > Algorithmes > Saisir un entier naturel pair et formé de 4 chiffres (Méthode 2)
Variante de la précédente, utilisant l'appartenance à l'intervalle.
Procédure Saisir (@ X : entier) DÉBUT Répéter Écrire("Donner 1 entier pair et de 4 chiffres: ") Lire (x) Jusqu'à x MOD 2 = 0 et x[1000..9999] FIN