Page 1 of 1

Programme algo

Unread postPosted: 16 Feb 2012, 19:06
by edwin
Bonsoir a tous,
J'ai une question, comment faire un programme d'algorithm​ique permettant de dire, trois points a,b et c étant donnes par leurs cordonnes da​ns un repere du plan, si le triangle abc est rectangle en b en utilisant if...then..​. else... endif sur les ti nspire cx cas

Re: Programme algo

Unread postPosted: 16 Feb 2012, 19:15
by critor
Il faut déjà ouvrir l'éditeur de programmes:
:nsdo: :ns4: A :ns1:


Ensuite, dans le programme tu commences par demander les coordonnées des 3 points à l'utilisateur.

Code: Select all
Request "xA=",xa
Request "yA=",ya
Request "xB=",xb
Request "yB=",yb
Request "xC=",xc
Request "yC=",yc




Tu peux alors calculer les longueurs des trois côtés, ce qui va faciliter la suite:

Code: Select all
racine((xb-xa)^2+(yb-ya)^2)->c
racine((xc-xa)^2+(yc-ya)^2)->b
...




Maintenant, les conditions deviennent beaucoup plus simples à écrire :)

Code: Select all
if a^2=b^2+c^2 then
disp "Le triangle ABC est rectangle en A."
endif
...

Re: Programme algo

Unread postPosted: 16 Feb 2012, 21:49
by edwin
Code: Select all
Define trirecb(xa,ya,xb,yb,xc,yc)=
Prgm
:If xa*(xb-xc)-xb^(2)+xb*xc+(ya-yb)*(yb-yc)=0 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