Après avoir effectué des recherches dans de nombreux livres comme Scientific Pascal, Dictionnaire mathématique,..., je n'ai jamais trouvé aucun livre fournissant une réponse correct du calcul de l'exponentiel (soit l'inverse de Ln ou la méthode Math.exp), outre le projet GNU (HaypoCALC). Je me suis donc basé sur sa formule pour arriver au résultat contenu dans cette page. Voici un code source Turbo Pascal pour Windows effectuant un calcul correct de cette formule en se basant sur les savants calculs de ce projet :
- Program ExpSamples;
-
- Uses WinCrt;
-
- Function Exp(x:Real):Real;
- Var
- Inverse:Boolean;
- n,i:Integer;
- dl,q:Real;
- Begin
- Inverse := False;
- n := 0;
- dl := 1;
- i := 1;
- If x < 0 Then Begin
- Inverse := True;
- x := -x;
- End;
- While x >= 2 do Begin
- x := x / 2;
- n := n + 1;
- End;
- x := x / 16;
- n := n + 4;
- q := x;
- While q > 1.0E-15 do Begin
- dl := dl + q;
- i := i + 1;
- q := q * x / i;
- End;
- For i := 1 to n do dl := dl * dl;
- If Inverse Then dl := 1 / dl;
- Exp := dl;
- End;
-
- Var
- I:Real;
-
- BEGIN
- I := 0.0;
- While I <= 2.0 do Begin
- WriteLn('Exp(',I,')=',Exp(I));
- I := I + 0.1;
- End;
- END.
on obtiendra le résultat suivant :
Exp(0.0)=1.0Exp(0.1)=1.1051709180756477
Exp(0.2)=1.221402758160166
Exp(0.30000000000000004)=1.349858807576001
Exp(0.4)=1.4918246976412661
Exp(0.5)=1.6487212707001244
Exp(0.6)=1.8221188003905087
Exp(0.7)=2.0137527074704717
Exp(0.7999999999999999)=2.225540928492434
Exp(0.8999999999999999)=2.4596031111569396
Exp(0.9999999999999999)=2.71828182845905
Exp(1.0999999999999999)=3.0041660239464347
Exp(1.2)=3.3201169227365463
Exp(1.3)=3.669296667619233
Exp(1.4000000000000001)=4.055199966844625
Exp(1.5000000000000002)=4.481689070338069
Exp(1.6000000000000003)=4.9530324243950865
Exp(1.7000000000000004)=5.473947391727178
Exp(1.8000000000000005)=6.04964746441294
Exp(1.9000000000000006)=6.685894442279275
Voir également
Dernière mise à jour : Dimanche, le 10 décembre 2017