CalculerCle:Nul Ou Fonction(O:Nul Ou TypeElement) Retourner Entier Lecture Public;
/****************************************************************/
Fonction F(C : Nul Ou Caractere) Retourner Entier
/* Objet : Fonction de hachage. */
/****************************************************************/
Debut
Si C==Nul Alors
Retourner 0;
Fin Si
Retourner C.Unicode(0);
Fin Fonction
Principal
/*******/
Variable
/******/
H : HachageDe Caractere;
Debut
H=HachageDe(F, 16);
...
Ecran.Ecrire(H.CalculerCle("Coucou"));
/* La clé est 67%16=3. */
Fin Principal
- | - | - | - | - | - | - | - | - |