J'ai le programme suivant et quand on veur vérifier la syntaxe, l'erreur nom de fonction ou de variable invalide apparait:
- Code: Tout sélectionner
Define trirecenb()=
Prgm
:Request "xa=",xa
:Request "ya=",ya
:Request "xb=",xb
:Request "yb=",yb
:Request "xc=",xc
:Request "yc=",yc
:xb-xa→xab
:yb-ya→yab
:Disp "ab(xab;yab)"
:xc-xa→xac
:yc-ya→yac
:Disp "ac(xac;yac)"
:xc-xb→xbc
:yc-yb→ybc
:Disp "bc(xbc;ybc)"
:(xab)^(2)+(yab)^(2)→f
:(xac)^(2)+(yac)^(2)→g
:(xbc)^(2)+(ybc)^(2)→h
:Disp "f"
:Disp "g"
:Disp "h"
:√f)→ab
:√g)→ac
:√h→bc
:Disp "ab"
:Disp "ac"
:Disp "bc"
:If f+h)=g Then
:Disp "Le triangle ABC est rectangle en B"
:Else
:Disp "Le triangle ABC n'est soit pas rectangle en B soit n'est pas un triangle rectangle"
:EndIf
:EndPrgm
Quel est le probleme
???Merci pour vos réponses.
