Section courante

A propos

Section administrative du site

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

Exemples

Voici un exemple montrant l'utilisation de «AND», dans Turbo Pascal, avec des valeurs brutes :

Essayer maintenant !
  1. Program AndRawSamples;
  2.  
  3. BEGIN
  4.  WriteLn('0 AND 1 = ',0 AND 1);
  5.  WriteLn('1 AND 1 = ',1 AND 1);
  6.  WriteLn('2 AND 1 = ',2 AND 1);
  7.  WriteLn('3 AND 1 = ',3 AND 1);
  8.  WriteLn('4 AND 1 = ',4 AND 1);
  9.  WriteLn('0 AND 2 = ',0 AND 2);
  10.  WriteLn('1 AND 2 = ',1 AND 2);
  11.  WriteLn('2 AND 2 = ',2 AND 2);
  12.  WriteLn('3 AND 2 = ',3 AND 2);
  13.  WriteLn('4 AND 2 = ',4 AND 2);
  14. END.

on obtiendra le résultat suivant :

0 AND 1 = 0
1 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 !
  1. Program AndSamples;
  2.  
  3. Function IsOdd(X:Integer):Boolean;Begin
  4.  IsOdd := Boolean(X AND 1);
  5. End;
  6.  
  7. BEGIN
  8.  WriteLn('Nombre -13 est impaire : ',IsOdd(-13));
  9.  WriteLn('Nombre -1 est impaire : ',IsOdd(-1));
  10.  WriteLn('Nombre 0 est impaire : ',IsOdd(0));
  11.  WriteLn('Nombre 1 est impaire : ',IsOdd(1));
  12.  WriteLn('Nombre 4 est impaire : ',IsOdd(4));
  13.  WriteLn('Nombre 7 est impaire : ',IsOdd(7));
  14.  WriteLn('Nombre 20 est impaire : ',IsOdd(20));
  15. END.

on obtiendra le résultat suivant :

Nombre -13 est impaire : TRUE
Nombre -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.

Dernière mise à jour : Samedi, le 13 juin 2015