IF |
Si |
---|---|
Turbo Pascal pour Windows |
Syntaxe
If exp_bool Then inst1; |
If exp_bool Then inst1 else Inst2; |
Paramètres
Nom | Description |
---|---|
exp_bool | Ce paramètre permet d'indiquer une expression booléen devant être vrai |
inst1 | Ce paramètre permet d'indiquer l'instruction exécuté si la condition est vrai |
Inst2 | Ce paramètre permet d'indiquer l'instruction exécuté si la condition est fausse |
Description
Ce mot réservé permet d'effectuer des branchements d'instruction ou de bloc d'instruction en fonction de certaines conditions.
Exemples
Cet exemple permet de tester une condition vrai :
on obtiendra le résultat suivant :
La condition est vraiCes exemples, en Turbo Pascal pour Windows, permet de tester le mot réservé «IF» d'un peu toute les façons :
- Program IfSamples2;
-
- Uses WinCrt;
-
- BEGIN
- If False Then WriteLn('FALSE');
- If Not False Then WriteLn('NOT FALSE');
- If True Then WriteLn('TRUE');
- If Not True Then WriteLn('NOT TRUE');
- If Boolean(0)Then WriteLn('0');
- If Boolean(NOT 0)Then WriteLn('NOT 0');
- If Not Boolean(0)Then WriteLn('NOT(0)');
- If Boolean(1)Then WriteLn('1');
- If Boolean(NOT 1)Then WriteLn('NOT 1');
- If Not Boolean(1)Then WriteLn('NOT(1)');
- If 100 > 300 Then WriteLn('100 > 300');
- If Boolean(1-Byte(100 > 300))Then WriteLn('1-(100 > 300)');
- END.
on obtiendra le résultat suivant :
NOT FALSETRUE
NOT 0
NOT(0)
1
NOT 1
1-(100 > 300)
NOT FALSE
TRUE
NOT 0
NOT(0)
1
NOT 1
1-(100 > 300)
Voir également
Langage de programmation - Turbo Pascal - Référence de procédures et fonctions - IF
Dernière mise à jour : Dimanche, le 10 décembre 2017