Exp |
Exposant |
|---|---|
| HighSpeed Pascal | System |
Syntaxe
| Function Exp(N):Real; |
Paramètres
| Nom | Description |
|---|---|
| N | Ce paramètre permet d'indiquer l'expression contenant le nombre à traiter. |
Description
Cette fonction permet de retourner la valeur exponentielle.
Remarque
- Le paramètre N est une expression de type entier ou de type réel.
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
L'exemple suivant permet de demander un nombre et de calculer l'exposant :
- Program ExpSamples;
- Var
- R:Real;
- BEGIN
- Write('Entrez un nombre: ');
- Readln(r);
- Writeln;
- Writeln('L''exponential est: ',EXP(r));
- END.
Dernière mise à jour : Lundi, le 20 avril 2020