Partie 1 :

A = (-0.12, -0.04)
B = (4.1, 4.14)
a = Segment(A, B)
C = (6, -1.92)
b = Segment(A, C)
c = Segment(C, B)
I = Midpoint(a)
J = Midpoint(b)
d = Line(I, J)
distanceJI = Distance(J, I)
distanceBC = Distance(B, C)
TexteBC: Name[B] + (Name[C]) + " \, = \, " + distanceBC
distanceIJ = Distance(I, J)
TexteIJ: Name[I] + (Name[J]) + " \, = \, " + distanceIJ