NbCles : 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);
H+="A";
H+="B";
H+="C";
Ecran.Ecrire(H.NbCles);
/* Le nombre de clés de H est 16. */
Fin Principal
- | - | - | - | - | - | - | - | - |