Page 1 of 1

Besoin aide adaptation programme algobox à ti-Nspire

Unread postPosted: 21 Sep 2015, 13:41
by scoubidou141
Bonjour, j'ai un TP de maths à faire, et je suis bloquée sur la dernière question. La question précédente présente l’algorithme de Horner en version algobox. Dans la dernière question, il faut donc adapter ce programme pour les calculettes, or le manuel donne les réponses pour les casio et les ti-82. Possédant une ti-Nspire, j'ai fait le tour des sites internet, et ne trouvant pas la réponse, je suis de plus en plus désespérée. Bref, voilà l’algorithme en version TI ( je suppose que c'est une Ti82, à vrai dire il n'y a pas plus de précision ) :
Code: Select all
PROGRAM: HORNER
:Prompt, N,L1 , X
:L1(1)*X+L1 (2)=> R
: For(I,3,N+1)=> R
:R*X+L1 (I) => R
: End
: Disp " IMAGE",=>R


Voilà, est ce que quelqu'un pourrait m'aider à l'adapter en ti-nspire ?
Merci d'avance,
scoubidou141

Re: Besoin aide adaptation programme algobox à ti-Nspire

Unread postPosted: 21 Sep 2015, 13:45
by Hamza.S
ton code
Code: Select all
Local n,list,x,r
list:={0,0,0}
Request "N =",n
Request "la liste :",list
Request "X =",x
r:=list[1]*x+list[2]
For i,3,n+1
r:=r*x+list[i]
EndFor
Disp "Image =",r

Re: Besoin aide adaptation programme algobox à ti-Nspire

Unread postPosted: 21 Sep 2015, 13:47
by scoubidou141
Merci beaucoup !
Maintenant je n'ai plus qu'à changer le nom des variables, encore merci !

Re: Besoin aide adaptation programme algobox à ti-Nspire

Unread postPosted: 21 Sep 2015, 16:25
by Bisam
En Basic, il n'est pas utile d'initialiser la liste ni de demander N puisque on peut le déduire du nombre de termes de la liste.
Par ailleurs, pourquoi faire un cas particulier pour les premiers termes de la suite ?
On peut donc simplifier en ceci :
Code: Select all
Local n,l,x,r
Request "la liste :",l
Request "X =",x
n:=dim(l)
r:=0
For i,1,n
   r:=r*x+l[i]
EndFor
Disp "Image =",r