Decoder (
ListeDExpressions )
Decoder
est une fonction permettant de décoder une valeur en une autre.
La première valeur est comparée à la seconde. Si la comparaison est Vrai, Decoder
retourne la valeur du troisième paramètre.
Sinon la première valeur est comparée à la quatrième. Si la comparaison est Vrai, Decoder
retourne la valeur du cinquième paramètre.
Le procédé continue jusqu'à ce qu'il n'y plus qu'un ou aucun paramètre. En ce cas :
Decoder
est donc impair, et la valeur retournée est Nul.
Decoder
est donc pair, et la valeur retournée est la valeur du dernier paramètre.
Decoder
est automatiquement définie pour tout type comportant l'opérateur ==
.
Les expressions passées en paramètre de Decoder
qui sont comparées doivent être de même type. Les expressions passées en paramètre de Decoder
qui sont susceptibles d'être renvoyées doivent être de même type.
Variable
/******/
A : Entier;
B : Entier;
C : Caractere;
Principal
/*******/
Debut
...
B=Decoder(A, 1, 10, 2, 20, 3, 30, A);
/* Decode 1 en 10, 2 en 20, 3 en 30. Pour un autre chiffre, le résultat est Nul. */
...
C=Decoder(A, 1, "Un", 2, "Deux", 3, "Trois", "Autre valeur");
/* Decode 1 en "Un", 2 en "Deux", 3 en "Trois". Pour un autre chiffre, il faut renvoyer "Autre valeur". */
...
Fin Principal
- | - | - | - | - | - | - | - | - |