π
<-

fonction else

fonction else

Unread postby rcourthi » 04 Jun 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
User avatar
rcourthi
Niveau 2: MI2 (Membre Initié)
Niveau 2: MI2 (Membre Initié)
Level up: 0%
 
Posts: 3
Joined: 04 Jun 2010, 00:00
Gender: Male
Calculator(s):
MyCalcs profile
Class: 2e BsC

Re: fonction else

Unread postby Kiligolo » 04 Jun 2010, 20:42

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

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!
User avatar
Kiligolo
Niveau 11: LV (Légende Vivante)
Niveau 11: LV (Légende Vivante)
Level up: 84.3%
 
Posts: 1465
Joined: 17 May 2010, 00:00
Gender: Male
Calculator(s):
MyCalcs profile
Class: 1reS

Re: fonction else

Unread postby jacques » 04 Jun 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: Select all
:If TN
:Then
:Input "C1:", A
:Else
:0-A
:End
:If T+1N
:Then
:Input "C1:", B
:Else
:0-B
:End
Sublime Chevalier Elu des TI

Venez visiter mon site sur les TI : Ti Softwares !!
Jetez un coup d'œil à mes programmes pour TI !!

Vous voulez faire des super programmes pour votre TI z80 ? Alors apprenez l'Axe Parser !!
User avatar
jacques
Niveau 12: CP (Calculatrice sur Pattes)
Niveau 12: CP (Calculatrice sur Pattes)
Level up: 14.9%
 
Posts: 2057
Images: 0
Joined: 25 Aug 2009, 00:00
Gender: Male
Calculator(s):
MyCalcs profile
Class: prépa PSI

Re: fonction else

Unread postby Kiligolo » 04 Jun 2010, 20:47

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

Je ne sais pas si c'est moi ou toi mais... il ne faut pas un ":" avant le A-0???
User avatar
Kiligolo
Niveau 11: LV (Légende Vivante)
Niveau 11: LV (Légende Vivante)
Level up: 84.3%
 
Posts: 1465
Joined: 17 May 2010, 00:00
Gender: Male
Calculator(s):
MyCalcs profile
Class: 1reS

Re: fonction else

Unread postby jacques » 04 Jun 2010, 20:52

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

Code: Select all
:If TN
:Then
:Input "C1:", A
:Else
:0-A
:End
:If T+1N
:Then
:Input "C1:", B
:Else
:0-B
:End
Sublime Chevalier Elu des TI

Venez visiter mon site sur les TI : Ti Softwares !!
Jetez un coup d'œil à mes programmes pour TI !!

Vous voulez faire des super programmes pour votre TI z80 ? Alors apprenez l'Axe Parser !!
User avatar
jacques
Niveau 12: CP (Calculatrice sur Pattes)
Niveau 12: CP (Calculatrice sur Pattes)
Level up: 14.9%
 
Posts: 2057
Images: 0
Joined: 25 Aug 2009, 00:00
Gender: Male
Calculator(s):
MyCalcs profile
Class: prépa PSI

Re: fonction else

Unread postby rcourthi » 04 Jun 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
User avatar
rcourthi
Niveau 2: MI2 (Membre Initié)
Niveau 2: MI2 (Membre Initié)
Level up: 0%
 
Posts: 3
Joined: 04 Jun 2010, 00:00
Gender: Male
Calculator(s):
MyCalcs profile
Class: 2e BsC

Re: fonction else

Unread postby Kiligolo » 04 Jun 2010, 21:19

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

Les parenthèses après if. Franchement je parie que tu programme en C!
User avatar
Kiligolo
Niveau 11: LV (Légende Vivante)
Niveau 11: LV (Légende Vivante)
Level up: 84.3%
 
Posts: 1465
Joined: 17 May 2010, 00:00
Gender: Male
Calculator(s):
MyCalcs profile
Class: 1reS

Re: fonction else

Unread postby Loulou 54 » 04 Jun 2010, 21:22

Le "Then", il ne faut pas le mettre sur la même ligne que la condition sur 84+ ??
rcourthi Alors, ça marche ?? :):
Mes programmes => ici !
User avatar
Loulou 54Premium
Niveau 13: CU (Calculateur Universel)
Niveau 13: CU (Calculateur Universel)
Level up: 1.6%
 
Posts: 1985
Images: 8
Joined: 02 Aug 2009, 00:00
Location: 54, près de Metz
Gender: Male
Calculator(s):
MyCalcs profile
Class: Ingé Logiciel chez Amazon

Re: fonction else

Unread postby Kiligolo » 04 Jun 2010, 21:23

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 ?? :):

Ah oui tu a raison! Je ne l'avais pas vu.
User avatar
Kiligolo
Niveau 11: LV (Légende Vivante)
Niveau 11: LV (Légende Vivante)
Level up: 84.3%
 
Posts: 1465
Joined: 17 May 2010, 00:00
Gender: Male
Calculator(s):
MyCalcs profile
Class: 1reS

Re: fonction else

Unread postby Loulou 54 » 04 Jun 2010, 21:34

Ça nous donnerait ça alors !

Code: Select all
:If TN Then
:Input "C1:", A
:Else
:0-A
:End
:If T+1N Then
:Input "C1:", B
:Else
:0-B
:End
Mes programmes => ici !
User avatar
Loulou 54Premium
Niveau 13: CU (Calculateur Universel)
Niveau 13: CU (Calculateur Universel)
Level up: 1.6%
 
Posts: 1985
Images: 8
Joined: 02 Aug 2009, 00:00
Location: 54, près de Metz
Gender: Male
Calculator(s):
MyCalcs profile
Class: Ingé Logiciel chez Amazon

Next

Return to TI-Basic

Who is online

Users browsing this forum: ClaudeBot [spider] and 6 guests

-
Search
-
Social TI-Planet
-
Featured topics
Comparaisons des meilleurs prix pour acheter sa calculatrice !
"1 calculatrice pour tous", le programme solidaire de Texas Instruments. Reçois gratuitement et sans aucune obligation d'achat, 5 calculatrices couleur programmables en Python à donner aux élèves les plus nécessiteux de ton lycée. Tu peux recevoir au choix 5 TI-82 Advanced Edition Python ou bien 5 TI-83 Premium CE Edition Python.
Enseignant(e), reçois gratuitement 1 exemplaire de test de la TI-82 Advanced Edition Python. À demander d'ici le 31 décembre 2024.
Aidez la communauté à documenter les révisions matérielles en listant vos calculatrices graphiques !
1234
-
Donations / Premium
For more contests, prizes, reviews, helping us pay the server and domains...
Donate
Discover the the advantages of a donor account !
JoinRejoignez the donors and/or premium!les donateurs et/ou premium !


Partner and ad
Notre partenaire Jarrety Calculatrices à acheter chez Calcuso
-
Stats.
2446 utilisateurs:
>2401 invités
>36 membres
>9 robots
Record simultané (sur 6 mois):
6892 utilisateurs (le 07/06/2017)
-
Other interesting websites
Texas Instruments Education
Global | France
 (English / Français)
Banque de programmes TI
ticalc.org
 (English)
La communauté TI-82
tout82.free.fr
 (Français)