PRED |
Précédent |
---|---|
Free Pascal | System |
Syntaxe
Function Pred(X:TOrdinal):TOrdinal; |
Paramètres
Nom | Description |
---|---|
X | Ce paramètre permet d'indiquer l'expression de type scalaire |
Description
Cette fonction permet de retourner la valeur précédente de l'expression.
Remarques
- La fonction Pred renvoie l'élément précédant l'élément lui ayant été passé. S'il est appliqué à la première valeur du type ordinal et que le programme a été compilé avec la vérification d'intervalle activée ({$R+}), alors une erreur d'exécution sera générée.
- L'erreur d'exécution 201 est générée lorsque le résultat est hors limites.
Exemple
Voici un exemple montrant l'utilisation de cette fonction :
- Program PredSamples;
-
- BEGIN
- WriteLn('Pred(0)=',Pred('0'));
- WriteLn('Pred(1)=',Pred('1'));
- WriteLn('Pred(9)=',Pred('9'));
- WriteLn('Pred(A)=',Pred('A'));
- WriteLn('Pred(Z)=',Pred('Z'));
- WriteLn('Pred(b)=',Pred('b'));
- WriteLn('Pred(0)=',Pred(0));
- WriteLn('Pred(1)=',Pred(1));
- WriteLn('Pred(9)=',Pred(9));
- WriteLn('Pred(10)=',Pred(10));
- WriteLn('Pred(777)=',Pred(777));
- WriteLn('Pred(779)=',Pred(779));
- END.
on obtiendra le résultat suivant :
Pred(0)=/Pred(1)=0
Pred(9)=8
Pred(A)=@
Pred(Z)=Y
Pred(b)=a
Pred(0)=-1
Pred(1)=0
Pred(9)=8
Pred(10)=9
Pred(777)=776
Pred(779)=778
Voir également
Langage de programmation - Free Pascal - Référence de procédures et fonctions - Ord
Langage de programmation - Free Pascal - Référence de procédures et fonctions - High
Langage de programmation - Free Pascal - Référence de procédures et fonctions - Low
Langage de programmation - Free Pascal - Référence de procédures et fonctions - Dec
Langage de programmation - Free Pascal - Référence de procédures et fonctions - Inc
Langage de programmation - Free Pascal - Référence de procédures et fonctions - Sqr
Langage de programmation - Free Pascal - Référence de procédures et fonctions - Sqrt
Langage de programmation - Free Pascal - Référence de procédures et fonctions - Succ
Langage de programmation - Free Pascal - Référence de procédures et fonctions - Sum