Dans ton cas (mais je connais pas le contexte),
tu peux utiliser que des entiers...
500 devient 500 000 en interne
0.001 devient 1 en interne
etc...
Et la tu effectues toutes tes opérations...
Type: Messages; Utilisateur: TicTacToe
Dans ton cas (mais je connais pas le contexte),
tu peux utiliser que des entiers...
500 devient 500 000 en interne
0.001 devient 1 en interne
etc...
Et la tu effectues toutes tes opérations...
1ere remarque sur le code suivant:
procedure TForm1.Button1Click(Sender: TObject);
var
d: double;
begin
d := StrToFloat( Edit1.Text );
Label1.caption := FloatToStr( Floor( 1 /...
Le problème des flottants est toujours omniprésent, et ne stocke pas forcément la réalité du nombre visuel (qui est ou non un arrondi).
Dans ce cas, utilise un extended et non pas un double, qui...
Vous avez un bloqueur de publicités installé.
Le Club Developpez.com n'affiche que des publicités IT, discrètes et non intrusives.
Afin que nous puissions continuer à vous fournir gratuitement du contenu de qualité, merci de nous soutenir en désactivant votre bloqueur de publicités sur Developpez.com.