= |
Egale |
---|---|
Ada |
Syntaxe
a = b |
Paramètres
Nom | Description |
---|---|
a | Ce paramètre permet d'indiquer le premier opérande à comparer. |
b | Ce paramètre permet d'indiquer le deuxième opérande à comparer. |
Retour
Valeur | Description |
---|---|
False | Cette valeur permet d'indiquer que les deux opérandes ont des valeurs différentes. |
True | Cette valeur permet d'indiquer que les deux opérandes ont des valeurs identiques. |
Description
Cet opérateur permet d'effectuer la comparaison de deux opérandes identiques.
Exemple
Voici un exemple montrant une utilisation de cet opérande :
- with TEXT_IO; use TEXT_IO;
-
- PROCEDURE Equal IS
- number9:Integer;
- numberfalse:Boolean;
- BEGIN
- number9 := 9;
- numberfalse := False;
- PUT("9 == 9 : ");
- IF 9 = 9 THEN
- PUT_LINE("égale");
- ELSE
- PUT_LINE("pas égale");
- END IF;
- PUT("false == false : ");
- IF False = False THEN
- PUT_LINE ("égale");
- ELSE
- PUT_LINE("pas égale");
- END IF;
- PUT("9 == number9 : ");
- IF 9 = number9 THEN
- PUT_LINE("égale");
- ELSE
- PUT_LINE("pas égale");
- END IF;
- PUT("false == numberfalse : ");
- IF False = numberfalse THEN
- PUT_LINE("égale");
- ELSE
- PUT_LINE("pas égale");
- END IF;
- PUT("false == 0 : ");
- IF Boolean'POS(False) = 0 THEN
- PUT_LINE("égale");
- ELSE
- PUT_LINE("pas égale");
- END IF;
- PUT("false == true : ");
- IF False = True THEN
- PUT_LINE("égale");
- ELSE
- PUT_LINE("pas égale");
- END IF;
- PUT("1 == -1 : ");
- IF 1 = -1 THEN
- PUT_LINE("égale");
- ELSE
- PUT_LINE("pas égale");
- END IF;
- END Equal;
on obtiendra le résultat suivant :
9 == 9 : égalefalse == false : égale
9 == number9 : égale
false == numberfalse : égale
false == 0 : égale
false == true : pas égale
1 == -1 : pas égale
Dernière mise à jour : Samedi, le 25 août 2012