Problème de variable

Bonjour à tous,
Voici mon problème, je suis entrain de créer un programme sur le raisonnement par récurrence, et j'ai un problème pour que ma calculatrice m'affiche les 2 premiers terme de la suite récurrente définie, voyez plutôt :

Code:: loop
local un,n
Dialog
Title "raisonnement par récurrence"
Request "U(n+1)=",un
EndDlog
Text "Initialisation"
0->n
For n,0,1,1
Disp "P("&string(n)&")="&un
EndFor
EndLoop

J'ai essayé de définir un comme cela :

Code:: expr(un)->un

Mais j'ai un message d'erreur comme quoi "un" n'est pas définie....

Quelqu'un saurait-il d'où vient le problème?...

J'aurais fait :

Code:: Local un, n //inutile de le mettre à l'intérieur de la boucle
Loop
Dialog
Title "raisonnement par récurrence"
Request "U(n+1)=",Un //on demande l'expression de la suite
EndDlog
If ok=0 //si l'utilisateur a appuyé sur [ESC]
Exit //on quiite la boucle
expr(un)->un //on convertit en expression
un->p(n)
Text "Initialisation"
0->n
For n,0,1,1
Disp "P("&string(n)&")="&string(p(n)) //affiche p(0) et p(1)
EndFor
EndLoop

(non testé, ça devrait marcher)

Ok, merci pour l'info tama.
Merci pour l'explication de la variable système "ok".
J'essaye cela dès que possible et je poste le résultat.
Merci encore.

ah zut, corrigé une erreur

Sujet: Re: Problème de variable Mar 01 Jan 2008, 19:15

J'ai essayé ce que tu m'avais conseillé. Mais j'ai une autre fenêtre de dialogue dans mon programme juste après :

Code:: Dialog
Title "raisonnnement par récurrence"
Request "U(n+1)=",un
EndDlog

et donc si je met :

Code:: if ok=0 then
Exit

Cela me saute ma fenêtre de dialog si ok n'est pas égal à 0. Donc j'ai rajouté ElseIf (j'ai d'autre condition après...) :

Code:: ElseIf ok=1 then

Pour ensuite faire intervenir ma boîte de dialogue, mais je rencontre le même problème... Undefined Variable...
Au niveau de la ligne :

Code:: expr(un)->un

Je n'arrive pas à savoir d'où vient le problème...

Sujet: Re: Problème de variable Mar 01 Jan 2008, 19:30

tu peux pas poster le code source complet ?

Sujet: Re: Problème de variable Mar 01 Jan 2008, 19:32

oui oui, je vais chercher ma TI et je te le poste.

Sujet: Re: Problème de variable Mar 01 Jan 2008, 19:35

Sujet: Re: Problème de variable Mar 01 Jan 2008, 19:39

Voilà le code source, alors ce n'est que le tout début du programme, soit indulgent tama... En fait j'essaye de créer un programme de raisonnement par récurrence donc voilà. Si y'a d'énormes erreurs dit le moi, enfin même s'il y en a des petites.

Code:: ()
Prgm
ClrHome:ClrIO
Local un,vi,n,pn
Dialog
Title "Récurrence V.1.00"
Text "Bienvenue sur le programme de"
Text "raisonnement par récurrence"
EndDlog
Loop
Dialog
Title "Récurrence V.1.00"
Request "U(n+1)=",un
Text "Valeur Interdite de n si aucune"
Request "tapez aucune",vi
EndDlog
If ok=0 Then
Exit
Else:Dialog
Title "Récurrence V.1.00"
Text "Hypothèse de récurrence avec"
Text "n et m des réels"
DropDown "P(n):",{"U(n+1) > U(n)","U(n+1) < U(n)","U(n+1) > U(n) > n","U(n) > U(n+1) > n","U(n) < U(n+1) < n","U(n+1) < U(n) < n","m > U(n+1) > U(n) > n","m> U(n) > U(n+1) > n"},pn
EndDlog:EndIf
Text "Initialisation"
expr(un)→un
un→p(n)
If vi=string(aucune) Then
0→n
For n,0,1,1
Disp "P("&string(n)&")="&string(p(n))
EndFor
Pause
ElseIf vi≠string(aucune) Then
1→n
For n,1,2,1
Disp "P("&string(n)&")="&string(p(n))
EndFor
EndIf
EndLoop
EndPrgm

Sujet: Re: Problème de variable Mar 01 Jan 2008, 19:51

Citation :: soit indulgent tama...

ce que tu peux faire, c'est ce que les programmeurs appellent le "debug" : avant la ligne : expr(un)->un, tu mets un "Pause un" pour voir si ça t'affiche bien la valeur que tu attends

Sujet: Re: Problème de variable Mar 01 Jan 2008, 19:56

alors j'ai fais ce que tu m'as demandé. J'ai mis "pause un", cela m'affiche bien la valeur que j'attend, celle que j'ai rentré, mais j'ai toujours le message d'erreur suivant au niveau de la ligne :

Code:: expr(un)->un

Sujet: Re: Problème de variable Mar 01 Jan 2008, 20:02

Et si tu écris "pause gettype(un)", toujours avant la ligne expr(un)->un ?

Sujet: Re: Problème de variable Mar 01 Jan 2008, 20:06

elle est stocké comme une variable "string", une chaîne de caractères si je ne me trompe pas, enfin ma calculatrice m'affiche "STR"

Sujet: Re: Problème de variable Mar 01 Jan 2008, 20:30

bah alors c'est quoi le problème avec expr(un) ? Si tu ne déclares pas un en local, ça marche ?

Sujet: Re: Problème de variable Mar 01 Jan 2008, 20:33

oui sa marche sans problème, je n'ai plus qu'à prendre cette option là, ne pas déclarer un en locale...

Sujet: Re: Problème de variable Mar 01 Jan 2008, 20:40

ok. bah dans ce cas il suffit de mettre "DelVar un" quand tu n'auras plus besoin de un

Sujet: Re: Problème de variable Mar 01 Jan 2008, 20:59

ok, c'est noté, mais c'est normal que sa me fasse cela?
merci pour ton aide tama, merci beaucoup. tu as vu des améliorations à apporter au tout début de mon programme?

Sujet: Re: Problème de variable Mar 01 Jan 2008, 21:15

Juste une question : pourquoi tu mets ton programme dans une boucle infinie ?

Sujet: Re: Problème de variable Mar 01 Jan 2008, 21:20

pour l'instant je l'ai mis comme cela car elle me permet de tester la validité des réponses de la multitude d'expression que je rentre, je rentre plein d'expression pour voir si tout est vrai, comme cela j'évite de relancer le programme à chaque fois. Mais par la suite je l'enlèverai.

Sujet: Re: Problème de variable Mar 01 Jan 2008, 22:38