Forum TI-Planet.org

rcourthi wrote: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

Code: Select all

:If TN
:Then
:Input "C1:", A
:Else
:0-A
:End
:If T+1N
:Then
:Input "C1:", B
:Else
:0-B
:End


jacques wrote: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: Select all

:If TN
:Input "C1:", A
:Else A-0
:End


Code: Select all

:If TN
:Then
:Input "C1:", A
:Else
:0-A
:End
:If T+1N
:Then
:Input "C1:", B
:Else
:0-B
:End


rcourthi wrote: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

Loulou 54 wrote:Le "Then", il ne faut pas le mettre sur la même ligne que la condition sur 84+ ??
rcourthi Alors, ça marche ??

Code: Select all

:If TN Then
:Input "C1:", A
:Else
:0-A
:End
:If T+1N Then
:Input "C1:", B
:Else
:0-B
:End