A = (-2.15818363071704, 0.16741064572225522)
B = (10.955168895971106, -1.0436951608826996)
C = (8.55383841735783, 6.6823246398730545)
D = (-0.6547419397591638, 6.055890601973938)
f = Segment(A, B)
g = Segment(B, C)
h = Segment(C, D)
i = Segment(D, A)
E = Midpoint(A, B)
F = Midpoint(B, C)
G = Midpoint(C, D)
H = Midpoint(D, A)
j = Segment(E, F)
k = Segment(F, G)
l = Segment(G, H)
m = Segment(H, E)
kaugusEF = Distance(E, F)
TekstEF: Name[E] + (Name[F]) + " = " + kaugusEF
kaugusFG = Distance(F, G)
TekstFG: Name[F] + (Name[G]) + " = " + kaugusFG
kaugusGH = Distance(G, H)
TekstGH: Name[G] + (Name[H]) + " = " + kaugusGH
kaugusHE = Distance(H, E)
TekstHE: Name[H] + (Name[E]) + " = " + kaugusHE