fonction else

→ **MyCalcs** profile · de **rcourthi** » 04 Juin 2010, 20:40

Bonjour,

je suis entrain d'écrire un programme de finance et j'ai un problème avec l'utilisation du "else" dans mon code.

:If (TN)
:Input "C1:", A
:Else: A=0
:If (T+1N)
:Input "C1:", B
:Else: B=0

Je m'explique. Je voudrais que A prenne la valeur "0" si la condition du if n'est pas vérifiée.

Il y a une faute dans mon else mais je ne parviens pas à la trouver.

Merci pour vos suggestions

→ **MyCalcs** profile · de **Kiligolo** » 04 Juin 2010, 20:42

rcourthi a écrit:Bonjour,

je suis entrain d'écrire un programme de finance et j'ai un problème avec l'utilisation du "else" dans mon code.

:If (TN)
:Input "C1:", A
:Else: A=0
:If (T+1N)
:Input "C1:", B
:Else: B=0

Je m'explique. Je voudrais que A prenne la valeur "0" si la condition du if n'est pas vérifiée.

Il y a une faute dans mon else mais je ne parviens pas à la trouver.

Merci pour vos suggestions

Nous ne sommes pas en C(++)! Soit tu met un 2e if, soit tu enlève le else!

PS: Il y a une apps de finance intégré dans ta calto!

programmes pour TI · de **jacques** » 04 Juin 2010, 20:45

Il faut mettre un End à la fin pour finir ta structure conditionnelle (en If, Then, Else) ; de plus, on utilise [sto] (->) pour affecter un nombre à une variable, et non = ; en outre, on ne mets pas de ":" après else.
Essaye ça :

Code: Tout sélectionner: :If TN :Then :Input "C1:", A :Else :0-A :End :If T+1N :Then :Input "C1:", B :Else :0-B :End

→ **MyCalcs** profile · de **Kiligolo** » 04 Juin 2010, 20:47

jacques a écrit:Il faut mettre un End à la fin pour finir ta structure conditionnelle ; de plus, on utilise [sto] (-) pour affecter un nombre à une variable, et non = ; en outre, on ne mets pas de ":" après else. Essaye ça :

Code: Tout sélectionner
:If TN :Input "C1:", A :Else A-0 :End

Je ne sais pas si c'est moi ou toi mais... il ne faut pas un ":" avant le A-0???

programmes pour TI · de **jacques** » 04 Juin 2010, 20:52

En effet, il subsiste des erreurs, voilà le bon code :

Code: Tout sélectionner: :If TN :Then :Input "C1:", A :Else :0-A :End :If T+1N :Then :Input "C1:", B :Else :0-B :End

→ **MyCalcs** profile · de **rcourthi** » 04 Juin 2010, 21:17

Merci pour vos réponses nombreuses et rapides

par contre je viens de me rendre compte que j'ai dû légèrement modifier mon code et vos suggestions ne fonctionnent pas.

Voilà le nouveau code

:If (T:Input "C1:" , A
: A/(1+R)- A je veux effectuer cette opération A est positif donc satisfait le if
:Else
:0-A
:End
:If (T+1:Input "C2:" , B
: B/((1+R)^2)- B
:Else
:0-B
:End

→ **MyCalcs** profile · de **Kiligolo** » 04 Juin 2010, 21:19

rcourthi a écrit:Merci pour vos réponses nombreuses et rapides

par contre je viens de me rendre compte que j'ai dû légèrement modifier mon code et vos suggestions ne fonctionnent pas.

Voilà le nouveau code

:If (T:Input "C1:" , A
: A/(1+R)- A je veux effectuer cette opération A est positif donc satisfait le if
:Else
:0-A
:End
:If (T+1:Input "C2:" , B
: B/((1+R)^2)- B
:Else
:0-B
:End

Les parenthèses après if. Franchement je parie que tu programme en C!