SET |
Ensemble |
|---|---|
| Turbo Pascal pour Windows | |
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) * 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;
-
- Uses WinCrt;
-
- 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 : Dimanche, le 10 décembre 2017