6APM3
Date: 23 Mars 2015

AB=AC=A_0B=A_1C
GE=GF=A_0E=A_1F

animer E

A_0 = (-6.9636363636363665, -3.876363636363642)
A_1 = (9.763636363636373, -3.840000000000005)
a = Segment(A_0, A_1)
A_2 = Midpoint(a)
B = Point(a)
C = Mirror(B, A_2)
c = Circle(C, A_1)
d = Circle(B, A_0)
A = Intersect(c, d, 2)
poly1, c_1, b, d_1 = Polygon(B, A, C)
E = Point(a)
F = Mirror(E, A_2)
e = Circle(E, A_0)
f = Circle(F, A_1)
G = Intersect(e, f, 1)
poly2, f_1, e_1, g = Polygon(E, G, F)
texte1: "Aire ABC=" + poly1
texte2: "Aire EFG=" + poly2
p: d_1 + b + c_1
q: g + f_1 + e_1
texte4: "périmètre EFG=" + q
distanceA0A1 = Distance(A_0, A_1)
TexteA0A1: Name[A_0] + (Name[A_1]) + " \, = \, " + distanceA0A1
texte3: "périmètre ABC=A_0A_1=" + p