Delphi/Lazarus: Arrondir les nombres décimaux vers le haut, vers le bas et normalement

Dans cet tutoriel, je voudrais vous montrer comment arrondir les nombres décimaux tels que les nombres extended, float ou real à l'aide de Delphi ou Lazarus.

Vous avez la possibilité d'arrondir les chiffres vers le haut, vers le bas ou normalement selon les règles bancaires.

Aperçu: Lazarus ainsi que Delphi fournissent les fonctions suivantes que vous pouvez utiliser pour arrondir:

• Round: arrondi normal / convergent (règle du banquier)
• Trunc: coupe les décimales (=arrondir vers le bas)
• Ceil: arrondir vers le haut (contenu dans Math)
• Floor: arrondir vers le bas (contenu dans Math)
• Int: fait une valeur inetger à partir d'un nombre décimal (=arrondir vers le bas)
• Frac: coupe tout ce qui est devant la virgule décimale ou remplace la partie entière du nombre par 0

Exemple: Dans cet exemple, je vous montre à quels résultats vous pouvez vous attendre en utilisant ces fonctions.

Code         Résultat     Code         Résultat 
round(7.2)   7            round(7.8)   8
trunc(7.2)   7            trunc(7.8)   7
ceil(7.2)    8            ceil(7.8)    8
floor(7.2)   7            floor(7.8)   7
int(7.2)     7            int(7.8)     7 
frac(7.2)    0.2          frac(7.8)    0.8

Astuce: Pour les fonctions Ceil() et Floor(), l'unité "Math" doit être ajoutée à la clause uses. Round(), Trunc(), Int() et Frac() font partie de l'unité "System" qui est généralement déjà incluse dans la section uses.