Autorisation : Membre
Nb de messages : 6
Inscrit le : Ven 21 Mar 2014, 11:57
Posté le : Ven 21 Mar 2014, 13:58
Salut ! voilà mon premier programme à poster, je l'ai amélioré mais à la base c'est en cours qu'on l'a fait... ^^
Code
Input "A=",A
Input "B=",B
Input "C=",C
If A<B et B<C (ici, < est plus petit ou égal à pour les deux)
Then
Disp "A=",A,"B=",B,"C=",C
Else
If A<B et C<B (ici, A est <ou égal)
Then
Disp "A=",A,"C=",C,"B=",B
Else
If B<A et C>A
Then
Disp "B=",B,"A=",A,"C=",C
Else
If B<C et C<A
Then
Disp "B=",B,"C=",C,"A=",A
Else
If C<A et A<B
Then
Disp "C=",C,"A=",A,"B=",B
Else
If C<B et B<A
Then
Disp "C=",C,"B=",B,"A=",A
Voilà... ^^ Dites-le moi s'il y a un souci avec svp ^^'
Autorisation : Membre
Nb de messages : 3738
Inscrit le : Lun 19 Oct 2009, 21:25
Posté le : Ven 21 Mar 2014, 19:18
Oui il y a un problème car tu ne refermes jamais les alternatives. Il faut les fermer avec des End. Si ce n'était pas à la fin du programme, cela poserait problème. Donc respecter la syntaxe est important, prend les bonnes habitudes dès maintenant.
Tu peux saisir les trois variables d'un coup avec Prompt.
Code
Prompt A,B,C
If A<B et B<C
Then
Disp "A=",A,"B=",B,"C=",C
Else
If A<B et C<B
Then
Disp "A=",A,"C=",C,"B=",B
Else
If B<A et C>A
Then
Disp "B=",B,"A=",A,"C=",C
Else
If B<C et C<A
Then
Disp "B=",B,"C=",C,"A=",A
Else
If C<A et A<B
Then
Disp "C=",C,"A=",A,"B=",B
Else
If C<B et B<A
Then
Disp "C=",C,"B=",B,"A=",A
End
End
End
End
End
End
Inutile de placer chaque test à l'intérieur d'une alternative Else puisque tes conditions reflètent déjà toutes les situations possibles sans ambiguïté ni manque.
Puisque chaque action est une unique commande, on peut omettre les Then/End.
Code
Prompt A,B,C
If A<B et B<C
Then // omissible
Disp "A=",A,"B=",B,"C=",C
End // omissible
If A<B et C<B
Disp "A=",A,"C=",C,"B=",B
If B<A et C>A
Disp "B=",B,"A=",A,"C=",C
If B<C et C<A
Disp "B=",B,"C=",C,"A=",A
If C<A et A<B
Disp "C=",C,"A=",A,"B=",B
If C<B et B<A
Disp "C=",C,"B=",B,"A=",A
J'aurais bien conseillé d'imbriquer des alternatives mais cela ne convient pas à ce problème.
---------------------- ti82statfr: 2008, inscrit: 2009, ti84pocketfr: noël2011, ti30xbmultiview: iut 2012-2014
Perfectionniste, manque tact. Pas le temps de tout publier depuis 2011. Répond toujours aux questions. (rédigé juin 2014)
