X = Point(Segment[(0, 0), (10, 0)])
O: (0, 0)
B: X
breite(x) = 10 - x
C: (x(X), breite(x(X)))
D: (0, breite(x(X)))
v1, a, b, c, d = Polygon(O, X, C, D)
u: (2 * a) + (2 * b)
A: (a * b)
Text1: "u = " + u + ""
Text2: "A = " + A + ""