Un petit exercice de traduction d'un algorithme en langage Casio qui pose problème en raison d'une valeur absolue bien génante !
Voici l'algorithme en question :
variables :
entiers : a et p
réel : u
Début
| n prend la valeur 0
| u prend la valeur -1/3
| Entrer la valeur de l'entier naturel p
| Tant que | u-3/2 | > 10^-p
| | n prend la valeur n+1
| | u prend la valeur 3n-1/2n+3
| Fin Tant que
| Afficher n
Fin
En CASIO cela donne :
0 N
-13 U
"P=" ? P
While Abs(U-1,5) > 10^(-P) (Abs dans OPTN F6 F4 F1)
N + 1 N
(3N - 1)(2N + 3) U
WEnd
N