RoundToDecimales (rtl)

De Wiki1000
(Différences entre les versions)
(Page créée avec « <source lang='delphi'>Function RoundToDecimales(X:double; dec:Integer):double;</source> Cette fonction retourne la valeur arrondie d'un nombre flottant. {|class="wikitable"… »)
 
 
(Une révision intermédiaire par un utilisateur est masquée)
Ligne 21 : Ligne 21 :
 
begin
 
begin
 
   d := 1.732;
 
   d := 1.732;
   r := RoundToDecimales(d,2); // c = 1.72
+
   r := RoundToDecimales(d,2); // r = 1.73
 +
 
 
   d := 1.735;
 
   d := 1.735;
   r := RoundToDecimales(d,2); // c = 1.74
+
   r := RoundToDecimales(d,2); // r = 1.74
 +
 
 
   d := 1.738;
 
   d := 1.738;
   r := RoundToDecimales(d,2); // c = 1.74
+
   r := RoundToDecimales(d,2); // r = 1.74
 
end;
 
end;
 
</source>
 
</source>

Version actuelle en date du 27 juillet 2012 à 09:07

Function RoundToDecimales(X:double; dec:Integer):double;

Cette fonction retourne la valeur arrondie d'un nombre flottant.

Result La valeur arrondie de l'argument au nombre de décimales.
X Nombre.
dec Nombre de décimales

Exemple

var d,r:double; 
begin
  d := 1.732;
  r := RoundToDecimales(d,2); // r = 1.73
 
  d := 1.735;
  r := RoundToDecimales(d,2); // r = 1.74
 
  d := 1.738;
  r := RoundToDecimales(d,2); // r = 1.74
end;

Voir aussi:

Développement DSMDéveloppement DSM





Whos here now:   Members 0   Guests 0   Bots & Crawlers 1
 
Outils personnels