Page 1 sur 1

Commande point

Publié : dim. févr. 10, 2013 12:45 pm
par albenic
Bonjour,

le programme suivant a pour vocation à calculer les coordonnées du milieu d'un segment défini par deux points. Je sais que cette commande existe mais l'objectif et de concevoir quelques sous-programmes pour tester les natures de différents quadrilatères et autres triangles.

Code : Tout sélectionner

mil(A,B):={
  local xI,yI;
  xI:=(abscisse(A)+abscisse(B))/2;
  yI:=(ordonnee(A)+ordonnee(B))/2;
retourne(point(xI,yI));
}:;
Le programme est fonctionnel mais la commande

Code : Tout sélectionner

afficher(mil(point(0,0),point(4,0)))
retourne

Code : Tout sélectionner

pnt(pnt[2,[536870968]])
qui n'est pas des plus lisibles.

Après vérification, il y a le même souci avec la commande

Code : Tout sélectionner

milieu
. Est-ce possible et comment faire pour obtenir un affichage correct ?

Par avance merci, Benoît.

Re: Commande point

Publié : dim. févr. 10, 2013 1:59 pm
par alb
salut,
Je ne comprends pas ce qu'apporte de plus la fonction mil ?
Cela dit A:=point(0,0);B:=point(4,0);I:=mil(A,B); affiche les 3 points.

Re: Commande point

Publié : dim. févr. 10, 2013 3:52 pm
par albenic
alb a écrit :salut,
Je ne comprends pas ce qu'apporte de plus la fonction mil ?
Cela dit A:=point(0,0);B:=point(4,0);I:=mil(A,B); affiche les 3 points.

Elle n'apporte rien certes mais l'idée est de la construire pour s'en servir pour un autre programme qui teste si un quadrilatère est un parallélogramme. Le programme contient la commande

Code : Tout sélectionner

afficher("c'est un parallélogramme car les diagonales ont même milieu "+mil(A,B))
.

Le problème est qu'à l’affichage je n'obtiens pas les coordonnées du milieu.

Re: Commande point

Publié : dim. févr. 10, 2013 4:24 pm
par parisse
C'est parce que vous calculez le mileu vu comme objet géométrique, alors que vous voulez afficher ses coordonnées, il faut donc ajouter la commande coordonees, afficher(coordonnees(...)) devrait répondre à vos souhaits.