Programme inégalité triangulaire
Répondre à la discussion
Affichage des résultats 1 à 9 sur 9

Programme inégalité triangulaire



  1. #1
    algerik

    Question Programme inégalité triangulaire


    ------

    Bonjour

    Je possède actuellement une TI-83 plus. Avec le prof, on a commencé les algorithmes. Je maîtrise un peu et j'ai réalisé quelques programmes simples.
    Cependant, j'ai du mal avec l'algorithme de l'inégalité triangulaire. Quand je l'exécute, il m'indique : ERR:SYNTAXE

    Sur la feuille du prof il y a écrit :
    Saisir XA, YA, XB, YB, XC, YC
    E prend la valeur de (XA-XB)²+(YA-YB)²
    F prend (XA-XC)²+(YA-YC)²
    G prend (XC-XB)²+(YC-YB)²
    Si E+F=G Alors afficher "Vrai"
    Sinon afficher "Faux"
    Finsi


    Donc, sur ma calculatrice, j'ai tapé :
    :Input "XA=", XA
    :Input "YA=", YA
    :Input "XB=", XB
    :Input "YB=", YB
    :Input "XC=", XC
    :Input "YC=", YC
    : (XA-XB)²+(YA-YB)² -->E
    : (XA-XB)²+(YA-YB)² -->F
    : (XC-XB)²+(YC-YB)² -->G
    :If E+F=G
    :ThenDisp "VRAI", VRAI
    :ElseDisp "FAUX", FAUX


    J'ai beau cherché, je ne trouve d'erreur. Et je voudrais bien comprendre. Pouvez-vous m'aidez svp.

    Merci d'avance

    -----
    127/1000 sur CG-1 motorisé en AD + APN Casio EXILIM EX-Z12

  2. #2
    F-BVXT

    Re : Programme inégalité triangulaire

    Donc, sur ma calculatrice, j'ai tapé :
    :Input "XA=", XA
    :Input "YA=", YA
    :Input "XB=", XB
    :Input "YB=", YB
    :Input "XC=", XC
    :Input "YC=", YC
    : (XA-XB)²+(YA-YB)² -->E
    : (XA-XB)²+(YA-YB)² -->F
    : (XC-XB)²+(YC-YB)² -->G
    :If E+F=G
    :ThenDisp "VRAI", VRAI
    :ElseDisp "FAUX", FAUX
    Le problème vient à la fin. La ligne If est bien mais en fait pour Then et Else, les actions à exécuter se mettent en dessous. Il suffit de mettre Disp "VRAI" ou Disp "FAUX" : VRAI et FAUX sans les guillemets sont inutiles (la calculette va calculer le produit des valeurs stocké dans les variables V,R,A et ou F,A,U et X). Enfin, il faut fermer ton instruction If avec un End. Voilà donc ça donnera ça :
    :Input "XA=", XA
    :Input "YA=", YA
    :Input "XB=", XB
    :Input "YB=", YB
    :Input "XC=", XC
    :Input "YC=", YC
    : (XA-XB)²+(YA-YB)² -->E
    : (XA-XB)²+(YA-YB)² -->F
    : (XC-XB)²+(YC-YB)² -->G
    :If E+F=G
    :Then
    isp "VRAI"
    :Else
    isp "FAUX"
    :End


    Voilà, il y a aussi des améliorations possibles pour prendre moins de mémoire mais pour des petits programmes ça n'a pas de grandes conséquences.
    Dernière modification par F-BVXT ; 23/03/2012 à 19h05.

  3. #3
    algerik

    Re : Programme inégalité triangulaire

    Bonjour, merci de ta réponse.

    J'ai fait tout ce que tu m'a dit, ça n'a rien changé.
    127/1000 sur CG-1 motorisé en AD + APN Casio EXILIM EX-Z12

  4. #4
    F-BVXT

    Re : Programme inégalité triangulaire

    Si tu veux apprendre la programmation en Ti-Basic, regarde ici :
    http://www.siteduzero.com/tutoriel-3...-ti-basic.html
    La première partie et les listes est largement suffisante pour ce qu'on te demandera au lycée mais personnellement comme ça m'avait intéressé j'ai finit par tous faire. Au premier coup d'oeil ça peut paraître long mais en fait c'est beaucoup plus rapide que si tu apprend la programmation au lycée (en tout cas pour moi c'était le cas) et là tu auras des bases solides.

  5. A voir en vidéo sur Futura
  6. #5
    F-BVXT

    Re : Programme inégalité triangulaire

    Oui autant pour moi j'ai oublié de te dire que quand tu stockes une valeur, il faut la stocké dans une variable et une variable est une lettre mais pas deux. Donc tu ne stockes pas dans XA mais dans A. Donc ça donne ça :
    : Input "XA=", A
    : Input "YA=", B
    : Input "XB=", C
    : Input "YB=", D
    : Input "XC=", E
    : Input "YC=", F
    : (XA-XB)²+(YA-YB)² -->G
    : (XA-XB)²+(YA-YB)² -->H
    : (XC-XB)²+(YC-YB)² -->I
    : If G+H=I
    : Then
    : Disp "VRAI"
    : Else
    : Disp "FAUX"
    : End
    Dernière modification par F-BVXT ; 23/03/2012 à 19h22.

  7. #6
    F-BVXT

    Re : Programme inégalité triangulaire

    : Input "XA=", A
    : Input "YA=", B
    : Input "XB=", C
    : Input "YB=", D
    : Input "XC=", E
    : Input "YC=", F
    : (A-C)²+(B-D)² -->G
    : (A-E)²+(B-F)² -->H
    : (E-C)²+(F-D)² -->I
    : If G+H=I
    : Then
    : Disp "VRAI"
    : Else
    : Disp "FAUX"
    : End

    Voilà il fallait aussi changer les variables dans le traitement.

  8. #7
    algerik

    Re : Programme inégalité triangulaire

    Ca marche nickel, merci à toi .
    127/1000 sur CG-1 motorisé en AD + APN Casio EXILIM EX-Z12

  9. #8
    algerik

    Re : Programme inégalité triangulaire

    Ah non en fait.

    Pour essayer j'ai fait :

    XA=0
    YA=2
    XB=2
    YB=2
    XC=4
    YC=2

    Il me met faux, alors que j'ai fait ce que tu m'a dit. Je comprends pas pourquoi.
    127/1000 sur CG-1 motorisé en AD + APN Casio EXILIM EX-Z12

  10. #9
    F-BVXT

    Re : Programme inégalité triangulaire

    Non, ça fonctionne, le fait que ta calculatrice t'affiche FAUX signifie que G+H n'est pas égal à I. Tu peux changer l'affichage en changeant le FAUX qui est entre guillemet pour afficher ce que tu veux. Si ta calculette t'affiche VRAI, c'est que G+H=I.

Discussions similaires

  1. Inégalité triangulaire
    Par invited7b28992 dans le forum Mathématiques du supérieur
    Réponses: 4
    Dernier message: 16/10/2011, 21h26
  2. Pb inégalité triangulaire .
    Par invite93e09f42 dans le forum Mathématiques du supérieur
    Réponses: 6
    Dernier message: 06/11/2010, 10h30
  3. inégalité triangulaire
    Par invite6ce4291e dans le forum Mathématiques du supérieur
    Réponses: 1
    Dernier message: 04/09/2008, 18h45
  4. Inégalité triangulaire (?)
    Par invite870bfaea dans le forum Mathématiques du supérieur
    Réponses: 9
    Dernier message: 06/10/2006, 00h05
  5. Inégalité triangulaire?
    Par Eogan dans le forum Mathématiques du supérieur
    Réponses: 4
    Dernier message: 04/01/2006, 15h43