SET |
Ensemble |
|---|---|
| QuickPascal | System |
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.
Remarque
- 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) |
| * | Cet 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 = ');
- WriteLn(C);
- For C:=#0 to #255 do If C In Caractere Then Write(C);
- WriteLn;
- END.
on obtiendra le résultat suivant :
Voyelle = AEIOUYHexadecimal = 0123456789ABCDEF
Dernière mise à jour : Vendredi, le 13 février 2015