Fonction Optimiser(NulAbsorbant) ExponentiationModulaire(B : Nul Ou Entier, E : Nul Ou Entier, M : Nul Ou Entier) Retourner Nul Ou Entier;
Fonction Optimiser(NulAbsorbant) ExponentiationModulaire(B : Nul Ou Decimal, E : Nul Ou Decimal, M : Nul Ou Decimal) Retourner Nul Ou Decimal;
(B^E)%M calculée avec une méthode proche de la division euclidienne, ce qui rend le calcul très efficace.
Si les paramètres sont des décimaux, alors ils doivent être des nombres entiers.
Si les paramètres sont Nul, alors le résultat est Nul.
Principal
/*******/
Variable
/******/
B : Entier;
E : Entier;
M : Entier;
R : Entier;
Debut
...
P=ExponentiationModulaire(B,E,M);
/* Calcule l'exponentiation modulaire. */
...
Fin Principal
| - | - | - | - | - | - | - | - | - |