Bonjour,
j'essaie d'écrire de petits programmes simples sur ma TI Voyage 200, mais je rame affreusement . Je ne me souviens comment on fait .en voici par exemple un qui ne marche pas !
Prog1()
Prgm
ClrIO
Request"a?", a
Expr(a)a
Request"b?", b
Expr(b)b
Define f(x)=ln(x)-5+2x+x[sup][/sup]
while a-b>0.001
If f((a+b)/20 Then
(a+b)/2a
Disp a
Disp b
Else
(a+b)/2b
Disp a
Disp b
Endif
Pause
Endwhile
Disp a
Disp b
EndPrgm
Voilà ! si quelqu'un a d'autres infos aussi pour m'orienter sur le sujet (hors manuel of course).
Merci d'avance .
Nadj
bonjour Nadj,
a premiere lecture je vois quelques fautes de langage
Pour definir la fonction f il faut faire
ln(x)-5+2x->f(x) (attention avec tes sup dans l'expression)
(la fleche se trouve sur ta calto entre le shift bouton bleu et la barre d espace
dans ton programme a est toujours plus grand que b? car sinon ton while sera toujours faux.
tu peux aller sur le site du capes de math qui t offre un tour d horizon assez complet de ta machine
Pourquoi ne pas mettre tout simplement :
Prompt a,b
au lieu de :
Request"a?", a
Expr(a)a
Request"b?", b
Expr(b)b
Bonjour, Nadj.
Je suppose que vous vous intéressez à la valeur de a et de b quand ils se rejoignent.
Dans la condition <hile, il faut remplacer a-b par abs(a-b) 'valeur absolue de l'écart
Si a+b est négatif, il y aura une erreur : logarithme d'un nombre négatif.
Si on choisit a positif et b négatif, il vaut mieux que a+b >= environ racine de 2 pour éviter ce cas à l'exécution du programme.
Vous devez être membre accéder à ce service...
Pas encore inscrit ?
1 compte par personne, multi-compte interdit !
Ou identifiez-vous :