AND |
Et |
|---|---|
| Turbo Pascal 1+ | |
Syntaxe
|
boolean AND boolean entier AND entier |
Paramètres
| Nom | Description |
|---|---|
| boolean | Ce paramètre permet d'indiquer une expression de type booléen avec lequel un «Et logique» est effectué |
| entier | Ce paramètre permet d'indiquer une expression de type entière avec lequel un «Et binaire» est effectué |
Description
Cet opérateur permet d'effectuer un Et logique sur des booléens ou Et binaire sur des valeurs numériques.
Remarque
- Cet opérateur permet de minimiser le nombre de mot réservé «IF». Ainsi, il est a noter que le cas suivant :
est équivalent à celui-ci :
Exemples
Voici un exemple montrant l'utilisation de «AND», dans Turbo Pascal, avec des valeurs brutes :
Essayer maintenant !
- Program AndRawSamples;
-
- BEGIN
- WriteLn('0 AND 1 = ',0 AND 1);
- WriteLn('1 AND 1 = ',1 AND 1);
- WriteLn('2 AND 1 = ',2 AND 1);
- WriteLn('3 AND 1 = ',3 AND 1);
- WriteLn('4 AND 1 = ',4 AND 1);
- WriteLn('0 AND 2 = ',0 AND 2);
- WriteLn('1 AND 2 = ',1 AND 2);
- WriteLn('2 AND 2 = ',2 AND 2);
- WriteLn('3 AND 2 = ',3 AND 2);
- WriteLn('4 AND 2 = ',4 AND 2);
- END.
on obtiendra le résultat suivant :
0 AND 1 = 01 AND 1 = 1
2 AND 1 = 0
3 AND 1 = 1
4 AND 1 = 0
0 AND 2 = 0
1 AND 2 = 0
2 AND 2 = 2
3 AND 2 = 2
4 AND 2 = 0
Voici un exemple permettant de tester si certains nombres sont impaires à l'aide de cet opérateur :
Essayer maintenant !
- Program AndSamples;
-
- Function IsOdd(X:Integer):Boolean;Begin
- IsOdd := Boolean(X AND 1);
- End;
-
- BEGIN
- WriteLn('Nombre -13 est impaire : ',IsOdd(-13));
- WriteLn('Nombre -1 est impaire : ',IsOdd(-1));
- WriteLn('Nombre 0 est impaire : ',IsOdd(0));
- WriteLn('Nombre 1 est impaire : ',IsOdd(1));
- WriteLn('Nombre 4 est impaire : ',IsOdd(4));
- WriteLn('Nombre 7 est impaire : ',IsOdd(7));
- WriteLn('Nombre 20 est impaire : ',IsOdd(20));
- END.
on obtiendra le résultat suivant :
Nombre -13 est impaire : TRUENombre -1 est impaire : TRUE
Nombre 0 est impaire : FALSE
Nombre 1 est impaire : TRUE
Nombre 4 est impaire : FALSE
Nombre 7 est impaire : TRUE
Nombre 20 est impaire : FALSE
Voir également
Langage de programmation - Turbo Pascal - Référence de procédures et fonctions - NOT
Langage de programmation - Turbo Pascal - Référence de procédures et fonctions - OR
Langage de programmation - Turbo Pascal - Référence de procédures et fonctions - XOR
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 93 à 94.