ABCD est un parallélogramme, 
E un point intérieur.
A quelle condition sur E les aires
 rouge et verte sont-elles égales ?

Déplacer E pour égaler les aires

C = (11.6, 2.78)
B = (8.82, -1.54)
b = Segment(C, B)
A = (-1.46, -1.52)
d = Line(A, b)
a = Segment(A, B)
c = Line(C, a)
D = Intersect(c, d)
h = Segment(D, B)
E = (7.412835653000124, 0.5046319874672515)
e = Segment(A, D)
f = Segment(C, D)
poly1, a_1, e_1, b_1 = Polygon(E, B, A)
poly2, b_2, c_1, e_2 = Polygon(C, E, B)
Textepoly1: "Aire de  " + (Name[E]) + (Name[B]) + (Name[A]) + " = " + poly1
Textepoly2: "Aire de  " + (Name[C]) + (Name[E]) + (Name[B]) + " = " + poly2
g = Segment(D, B)
i = Segment(A, C)
I = Intersect(h, i)
j = Line(B, E)
F = Intersect(j, i)
preuve = false
resultat = false
k = Segment(B, F)