Section courante

A propos

Section administrative du site

XOR

 Ou exclusif
Virtual Pascal  

Syntaxe

boolean XOR boolean
entier XOR entier

Paramètres

Nom Description
boolean Ce paramètre permet d'indiquer une expression de type booléen avec lequel un «Ou exclusif logique» est effectué
entier Ce paramètre permet d'indiquer une expression de type entière avec lequel un «Ou exclusif binaire» est effectué

Description

Cet opérateur permet d'effectuer un Ou exclusif logique sur des booléens ou Ou exclusif binaire sur des valeurs numériques.

Exemple

Voici un exemple permettant d'échanger la valeur des opérandes A et B à l'aide de l'opérateur XOR :

  1. Program XorSamples;
  2.      
  3. Procedure Exchange(Var A,B:Integer);Begin
  4.  A := A XOR B;
  5.  B := A XOR B;
  6.  A := A XOR B;
  7. End;
  8.      
  9. Const
  10.  X:Integer=160;
  11.  Y:Integer=-17;
  12.      
  13. BEGIN
  14.  WriteLn('X = ',X,', Y = ',Y);
  15.  Exchange(X,Y);
  16.  WriteLn('X = ',X,', Y = ',Y);
  17. END.

on obtiendra le résultat suivant :

X = 160, Y = -17
X = -17, Y = 160

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