Fonction Optimiser(Invariant, NulAbsorbant) Unicode(Position : Nul Ou Entier) Retourner Nul Ou Entier;
Si le binaire est Nul ou si Position est Nul, alors le résultat est Nul.
Si Position est négatif, alors le résultat est -1.
Si Position est supérieur à la taille du binaire, alors le résultat est -1.
Principal
/*******/
Variable
/******/
B1 : Binaire;
E2 : Entier;
Debut
B1=Binaire("ABCDEF");
/* B1 contient A B C D E F. */
E2=B1.Unicode(2);
/* E2 contient 67, le code de C. */
Fin Principal
Traduction
- - - - - - - - -