pb ac un while !! important !! - Page 1

voila .. g ma soeur ki m'a demandé de faire un prog sur sa ti89 pour le calcule par rapport au téorème d'euclide étendu ..
voila la source :

Prgm
Dialog
Title "Euclide étendu"
Text "Entrez les paramètres :"
Request "n1",n
Request "n1/n",b
EndDlog
n->d
b->e
0->s
1->t
iPart(d/e)->q
d-q*e->r
While r>0
s-q*t->z
If z >= 0 Then
mod(z,n)->z
Else
n-mod(-z,n)->z
EndIf
t->s
z->t
e->d
r->e
iPart(d/e)->q
d-q*e->r
EndWhile
If e <> 1 Then
Disp b,"n'a pas d'inverse modulo ",n
Else
Disp "t=",t
EndIf
EndPrgm

Il me sort que le pb vient du While, car il faut apparament un type booléen après (true ou false) or j'ai mit un test : r>0

enfin, essayez de voir koi ! lol
mais c asser pressant apparament, parce ke ma soeur à un partiel ds peu de temps, et il faut ke ce problème soit réglé relativement rapidment .. aidez moi svp !!
merci
swop

Il faut que ce qui suive ton while renvoi une expréssion de type boléenne, et donc r>0 marche très bien .
Si il te fait une erreur dessu, cela vient forcément de r.

En effet, après l'éxécution de ton programme, en regardant la valeur de r, on trouve:




et voilà. Le probléme vient de mode de saisie de tes valeurs en fait, il faut que tu les reconvertisse en des nombres, car ici, ce sont des strings (chaine de caractére) à l'origine
Donc il te suffit de rajouter qqch comme expr(n)->n et expr(b)->b juste après la boite de dialogue .

Edit: Fr.

ok merci bcp !! ca marche a merveille ..

À autre chose, met toutes les variables en local de préférence, sa évite de polluer la calto