Forum TI-Planet.org

Bonjour j'aurai besoin d'aide pour un programme à faire sur une voyage 200:

je voudrai pouvoir afficher un nombre fini de termes d'une suite.
Mon algorithme est :

suites(r)
local u,n
u=1 et n=0
Tant que nr
u(n)=10^n/n!
n=n+1
Imprimer les différents u(n)

Mon programme :

suites(r)
Prgm
Local u,n
1-u
0-n
While nr
10^n/n!-u[n]
Disp u[n]
n+1-n
EndWhile
EndPrgm

Le programme ne fonctionne pas. Pouvez-vous m'aider?

essaie :

Code: Select all

suites(r)
Prgm
local u,n
newlist(r)-u
For(n,1,r)
10^n/n!-u[n]
EndFor
Pause u
EndPrgm


c'est ton programme mais optimisé (tient en 9 lignes )