Description...
Exemple...
Voir aussi...
Traduction...
Fonction Optimiser(Invariant) EnumererEnumeres(Numero : Entier, Aide : Nul Ou Caractere Sortie) Retourner Nul Ou Caractere;
En sortie, la variable Aide recueille un libellé donnant la sémantique de l'énuméré et le résultat est le nom de l'énuméré.
Enumere
A Dans (A1, A2);
B Dans (B1, B2, B3);
Variable
M : Nul Ou Module;
Numero : Entier;
N : Nul Ou Caractere;
Principal
M=Module("M1");
N=M.EnumererEnumeres(++Numero, ?);
/* Enumère les énumérés de 'M1'. */
TantQue N!=Nul Faire
Ecran.Ecrire(N);
N=M.EnumererEnumeres(++Numero, ?);
Fin TantQue
Fin Principal
SatzAufgezahlteWerteAufZahlen | EnumerateSetOfEnumeratedValues | 列举套被列举的价值 | EnumerarEnumerados | - | - | - | - |