aire totale

=

a = 26.400000000000002 (slider from 0 to 48, step 0.1)
A = (5.508668000648962, 3.949884808825912)
B = Point(Circle[A, a / 3])
b = Segment(A, B)
poly1, c, d, e, C = Polygon(A, B, 3)
D = (-3.93333080958304, 6.196166783840785)
E = Point(Circle[D, (48 - a) / 4])
f = Segment(D, E)
poly2, g, h, i, j, F, G = Polygon(D, E, 4)
Textepoly2: "Aire = " + poly2
Textepoly1: "Aire = " + poly1
airetotale: poly1 + poly2
T3: airetotale + ""