Afficher le rapport des aires

A = (5.08691697515697, 4.777837335920155)
B = (-0.030411574860646672, -6.736151901619506)
C = (14.56, -4.08)
poly1, c, a, b = Polygon(A, B, C)
A_1 = Mirror(B, C)
B_1 = Mirror(C, A)
C1 = Mirror(A, B)
A_2 = Mirror(C1, B_1)
B_2 = Mirror(A_1, C1)
C_2 = Mirror(B_1, A_1)
poly2, c2, a2, b2 = Polygon(A_2, B_2, C_2)
d = Segment(A, B_1)
e = Segment(B, C1)
f = Segment(C, A_1)
g = Segment(A_2, C1)
h = Segment(B_2, A_1)
i = Segment(B_1, C_2)
texte1: "aire de ABC = " + poly1 + ""
texte2: "aire de A_2B_2C_2 = " + poly2 + ""
r: poly2 / poly1
texte3: "\frac{aire \  de \ A_2B_2C_2}{aire\ de\  ABC} = " + (LaTeX[r]) + ""
j = false