A = Point(yAxis)
B = Point(yAxis)
C = (8, 6)
D = Point(xAxis)
a = Segment(B, C)
b = Segment(C, D)
c = Segment(D, A)
d = Segment(A, B)
M = Point(d)
distanceAM = Distance(A, M)
TexteAM: Name[A] + (Name[M]) + " \, = \, " + distanceAM
N: (distanceAM, 6.0)
R: (8.0, 6.0 - distanceAM)
S: (8.0 - distanceAM, 0.0)
e = Segment(M, N)
f = Segment(N, R)
g = Segment(R, S)
h = Segment(S, M)
distanceME: distanceAM
i = Distance(A, M)
texte1: Name[A] + (Name[M]) + " \, = \, " + i
poly1, m, n, r, s = Polygon(M, N, R, S)