Section courante

A propos

Section administrative du site

EXP

 Exposant
LotusScript

Syntaxe

Function Exp(n As Real) As Real

Paramètres

Nom Description
n Ce paramètre permet d'indiquer l'expression contenant le nombre à traiter

Description

Cette fonction retourne la valeur exponentielle.

Algorithme

MODULE EXP(x)
   Inverse ← faux
   n ← 0
   dl ← 1
   i ← 1
   SI x < 0 ALORS
      Inverse ← vrai
      x ← -x
   FIN SI
   BOUCLE FAIRE TANT QUE x >= 2
      x ← x / 2
      n ← n + 1
   FIN BOUCLE FAIRE TANT QUE
   x ← x / 16
   n ← n + 4
   q ← x
   BOUCLE FAIRE TANT QUE q > 1.0E - 15
      dl ← dl + q
      i ← i + 1
      q ← q x x / i
   FIN BOUCLE FAIRE TANT QUE
   BOUCLE POUR i ← 1 JUSQU'A n
      dl ← dl x dl
   FIN BOUCLE POUR
   SI Inverse ALORS
      dl ← 1 / dl
   FIN SI
   RETOURNE dl

Exemple

Voici un exemple permet d'afficher les exposants inférieurs à 2 :

  1. Sub Main
  2.      Dim I As Double
  3.      For I = 0 To 2.0 Step 0.1
  4.           Print "Exp(" & I & ")=" & Exp(I)
  5.      Next 
  6. End Sub

on obtiendra le résultat suivant :

Exp(0)=1
Exp(0.1)=1.1051709180756477
Exp(0.2)=1.2214027581601699
Exp(0.3)=1.3498588075760032
Exp(0.4)=1.4918246976412703
Exp(0.5)=1.6487212707001282
Exp(0.6)=1.8221188003905089
Exp(0.7)=2.0137527074704766
Exp(0.8)=2.4596031111569494
Exp(0.9)=2.718281828459045
Exp(1.0)=3.0041660239464325
Exp(1.2)=3.3201169227365472
Exp(1.3)=3.6692966676192444
Exp(1.4)=4.055199966844675
Exp(1.5)=4.481689070338065
Exp(1.6)=4.953032424395117
Exp(1.7)=5.473947391727202
Exp(1.8)=6.049647464412949
Exp(1.9)=6.685894442279273

Voir également

Langage de programmation - LotusScript - Référence de procédures et fonctions - LOG
Articles - Les géants de l'informatique - IBM

Dernière mise à jour : Jeudi, le 8 janvier 2015