e = 1 (slider from -5 to 5, step 0.1)
f = 1 (slider from -3 to 3, step 0.1)
A: (e, f)
B: (5, f)
D: (e, 5)
C = (5, 5)
poly1, a, b, c, d = Polygon(A, B, C, D)
Textpoly1: "Fläche " + (Name[A]) + (Name[B]) + (Name[C]) + (Name[D]) + " = " + poly1