X = 1.92 (slider from 0 to 12)
O: (0, 0)
B: (4, 0)
C: (4, 4)
D: (0, 4)
q1, o, b, c, d = Polygon(O, B, C, D)
E: (0, 1)
M: (If[X < 4, X, X < 8, 4, 12 - X], If[X < 4, 0, X < 8, X - 4, 4])
q2, o_1, b_1, m, e = Polygon(O, B, M, E)
texte1: "A_{OBCD}=" + (LaTeX[q1]) + "\\
X=" + (LaTeX[X]) + "\\
A_{OBME}=" + (LaTeX[q2]) + ""