je souhaiterais écrire un programme pour calculer un barycentre de 2, 3 ou 4 points de l'espace. J'ai déjà commencé mais il marche pas pour 3 et 4 points.
Je débute dans la programmation j'ai donc écrit beaucoup de chose inutiles je pense !
Code
:EffEcr
:Input "COMBIEN DE POINT",Z
:If Z=2
:Prompt A;B,C,D,E,F,G,H
:(AB+EF)/(A+E)->Q
:(AC+EG)/(A+E)->R
:(AD+EH)/(A+E)->S
:Disp Q,R,S
:If Z=3
:Prompt A,B,C,D,E,F,G,H,I,J,K,L // je pense que c'est là que c'est pas bon
:(AB+EF+IJ)/(A+E+I)->T
:(AC+EG+IK)/(A+E+I)->U
:(AD+EH+IL)/(A+E+I)->V
:Disp T,U,V
:If Z=4
:Prompt A,B,C,D,E,F,G,H,I,J,K,L,M,N,O,P // et là aussi !
:(AB+EF+IJ+MN)/(A+E+I+M)->W
:(AB+EF+IJ+MO)/(A+E+I+M)->X
:(AB+EF+IJ+MP)/(A+E+I+M)->Y
:Disp W,X,Y
:Output(1,1,"
