Fonction Optimiser(NulAbsorbant) Aleatoire(NbChiffres : Nul Ou Entier, DoitEtrePremier : Booleen=Faux) Retourner Nul Ou Decimal;
Si le paramètre DoitEtrePremier a pour valeur Vrai, alors le nombre décimal est un nombre premier.
Si le paramètre NbChiffres est Nul, alors le résultat est Nul.
Principal
/*******/
Variable
/******/
D : Decimal;
Debut
...
D=Aleatoire(25);
/* D n'est pas forcement premier. Il comporte 25 chiffres. */
...
D=Aleatoire(50, Vrai);
/* D est forcement premier. Il comporte 50 chiffres. */
...
Fin Principal
- | - | - | - | - | - | - | - | - |