cm²

A = (-2, 1)
B = Point(Circle[A, 6])
a = Segment(A, B)
C = (0.4, 4.98)
poly1, c, a_1, b = Polygon(A, B, C)
Textpoly1: "Fläche " + (Name[A]) + (Name[B]) + (Name[C]) + " = " + poly1