B = Point(yAxis)
A = Point(yAxis)
M = Point(xAxis)
poly1, m, a, b = Polygon(B, A, M)
C = Intersect(xAxis, yAxis)
c = Segment(C, M)
perímetropoly1 = Perimeter(poly1)
T1: "Área " + (Name[B]) + (Name[A]) + (Name[M]) + " = " + poly1