[TI 83+] Relation de Pythagore

par **payne** le Mer 11 Oct - 14:50

Programme très simple que j'ai réalisé en quelques minutes, il suffit d'écrire nos deux mesures de côtés connus et marquer "0" là où nous voulons savoir quel est la mesure du côté (P.S. C est l'Hypoténuse!) :

Hypothèse :
-> veut dire stocker (STO->), ce bouton se situe juste en haut du bouton ON

est une racine carré
^2 est "au carré"

:ClrHome
:Output(2,1,"B:
:Output(3,1,"C:
:Input ("A:",Z
:Output(3,1,"C:
:Input ("B:",Y
:Input ("C:",X
:If Z=0
:

(X^2-Y^2)->R
:If Y=0
:

(X^2-Z^2)->R
:If X=0
:

(Z^2+Y^2)->R
:Output(5,1,R
:Output(5,13,"= R

P.S. le "=R" veut simplement vous indiquer que la réponse donnée est stockée (mémorisée) dans la variable R