bellakatia le 21/03/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 ^^'
linkakro le 21/03/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.
