Fonction Optimiser(Invariant, NulAbsorbant, PasDEffetDeBord) Decrypter(B : Nul Ou Binaire, Cle : Nul Ou Caractere) Retourner Nul Ou Binaire;
Fonction Optimiser(Invariant, NulAbsorbant, PasDEffetDeBord) Decrypter(C : Nul Ou Caractere, Cle : Nul Ou Caractere) Retourner Nul Ou Caractere;
La clé pour décrypter doit être la même que celle qui sert pour crypter. La clé doit être longue de quatre caractères.
Si B, C ou Cle est Nul, alors le résultat est Nul.
Principal
/*******/
Variable
/******/
Cle : Nul Ou Caractere;
MotDePasse : Nul Ou Caractere;
Debut
...
Cle="KIKA";
Ecran.Ecrire(Decrypter(MotDePasse, Cle));
/* Ecrit le mot de passe une fois decrypté. */
...
Fin Principal
- | - | - | - | - | - | - | - | - |