Vous pouvez faire varier manuellement
la position du point $M$ à l'aide du curseur
ou laisser le logiciel jouer l'animation en
appuyant sur le petit bouton Play en bas
à gauche de l'écran.

AM = 2.19 (slider from 0 to 8, step 0.01)
B = (8, 0)
A = (0, 0)
M: (AM, 0)
poly1, a_2, b, c, d, C, D = Polygon(A, B, 4)
poly2, a_1, e, f, g, F, G = Polygon(A, M, 4)
k = Line(G, F)
E = Intersect(k, b)
I = Midpoint(E, F)
h = Segment(I, M)
i = Segment(I, B)
poly3, b_1, e_1, i_1 = Polygon(M, I, B)
j = Segment(F, E)
Textepoly3: "Aire_{triangle  " + (Name[M]) + "" + (Name[I]) + "" + (Name[B]) + "} = " + poly3 + ""
Textepoly2: "Aire_{petit carré} = " + poly2 + ""
texte1: "Aire motif $= " + (LaTeX[poly2]) + "+" + (LaTeX[poly3]) + "$"