Déplacer le point M à la souris.

A = (0, 4)
B = (0, 0)
C = (8, 0)
D = (8, 6)
a = Segment(B, C)
M = Point(a)
poly1, m, a_1, b = Polygon(A, B, M)
poly2, d, m_1, c = Polygon(M, C, D)
texte1: "Aire de ABM = " + poly1
texte2: "Aire de MCD = " + poly2
e = Segment(B, M)
E = Midpoint(B, M)
texte3: " x = BM =  " + (Distance[B, M])