Section courante

A propos

Section administrative du site

AND

Et
Virtual Pascal  

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.

Exemples

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

  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 :

  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


Dernière mise à jour : Vendredi, le 29 juillet 2016