A = (-2.64, 5.94)
B = (6.24, 4)
C = (-0.66, -1.34)
poligon1, c, a, b = Polygon(A, B, C)
D = Midpoint(A, B)
E = Midpoint(B, C)
F = Midpoint(C, A)
poligon2, e, f, d = Polygon(F, D, E)
Szövegpoligon1: "Terület " + (Name[A]) + (Name[B]) + (Name[C]) + " = " + poligon1
Szövegpoligon2: "Terület " + (Name[F]) + (Name[D]) + (Name[E]) + " = " + poligon2