Blame view

Giac_maj/giac-1.4.9/examples/demo/napoleon.cxx 620 Bytes
6663b6c9   adorian   projet complet av...
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
  assume(a=-1);
  assume(b=-1);
  A:=point(0);
  B:=point(2,0);
  C:=point(a,b);
  T1:=couleur(triangle_equilateral(A,B),vert);
  T2:=couleur(triangle_equilateral(B,C),vert);
  T3:=couleur(triangle_equilateral(C,A),vert);
  couleur(circonscrit(T1),vert);
  couleur(circonscrit(T2),vert);
  couleur(circonscrit(T3),vert);
  AB:=segment(A,B);
  AC:=segment(A,C);
  CB:=segment(C,B);
  M:=normal(isobarycentre(T1));
  N:=normal(isobarycentre(T2));
  O:=normal(isobarycentre(T3));
  MN:=couleur(segment(M,N),rouge);
  NO:=couleur(segment(N,O),rouge);
  OM:=couleur(segment(O,M),rouge);
  normal(longueur2(M,N)-longueur2(N,O));
  normal(longueur2(N,O)-longueur2(O,M));