SET |
Ensemble |
|---|---|
| Turbo Pascal 3+ | |
Syntaxe
| Type identype=Set of typbase; |
| Var identvar:Set of typbase; |
Paramètres
| Nom | Description |
|---|---|
| identype | Ce paramètre permet d'indiquer un nom de type de données |
| identvar | Ce paramètre permet d'indiquer un nom de variable |
| typbase | Ce paramètre permet d'indiquer un type de base |
Description
Ce mot réservé permet de définir des ensembles.
Remarques
- Le type de base d'un ensemble doit être un type ordinal avec pas plus de 256 valeurs possibles.
- Les valeurs ordinales des limites supérieure et inférieure du type de base doivent être comprises entre 0 et 255.
- Un constructeur d'ensemble, désignant une valeur de type ensemble, est formé en écrivant des expressions entre crochets. Chaque expression désigne une valeur de l'ensemble.
- La notation [] désigne l'ensemble vide, étant compatible avec tous les types d'ensemble.
- Lorsqu'on utilise ce type de données, les opérateurs suivants peuvent être employé sur des opérandes de types ensembles :
| Opération | Description | Premier opérateur | Deuxième opérateur | Résultat |
|---|---|---|---|---|
| + | Cet opérateur effectue une opération d'union | Ensemble (Set) | Ensemble (Set) | Ensemble (Set) |
| - | Cet opérateur effectue une opération de différence | Ensemble (Set) | Ensemble (Set) | Ensemble (Set) |
| * | Cette opérateur effectue une opération d'intersection | Ensemble (Set) | Ensemble (Set) | Ensemble (Set) |
| = | Cet opérateur effectue une opération d'égalité | Ensemble (Set) | Ensemble (Set) | Booléen |
| <> | Cet opérateur effectue une opération de différence | Ensemble (Set) | Ensemble (Set) | Booléen |
| <= | Cet opérateur effectue une opération de inclus | Ensemble (Set) | Ensemble (Set) | Booléen |
| >= | Cet opérateur effectue une opération de comprend | Ensemble (Set) | Ensemble (Set) | Booléen |
| In | Cet opérateur effectue une opération de appartient | Ensemble (Set) | Ensemble (Set) | Booléen |
Exemple
Voici quelques exemples de l'utilisation de ce mot réservé :
- Program SetSamples;
-
- Var
- RegistreIntel8088:Set of (AH,AL,AX,BH,BL,BP,BX,CH,CL,CS,CX,DH,DL,DS,DX,ES,SI);
- Alphabet:Set Of 'A'..'Z';
- Centieme:Set of 0..99;
- Caractere:Set Of Char;
- C:Char;
-
- BEGIN
- RegistreIntel8088:=[AL,AH,BL,BH,CL,CH,DL,DH];
- Alphabet:=['A','E','I','O','U','Y'];
- Write('Voyelle = ');
- For C:='A' to 'Z' do If C In Alphabet Then Write(C);
- WriteLn;
- Caractere:=['0'..'9','A'..'F'];
- Write('Hexadecimal = ');
- For C:=#0 to #255 do If C In Caractere Then Write(C);
- WriteLn;
- END.
on obtiendra le résultat suivant :
Voyelle = AEIOUYHexadecimal = 0123456789ABCDEF
Référence
Aide-mémoire de Turbo Pascal versions de 3 à 6, Edition Marabout, De Groote, Virga, 1992, ISBN: 2-501-01833-8, page 372 à 373.
Dernière mise à jour : Dimanche, le 8 février 2015