Dolžina = 9.4 (slider from 0 to 18, step 0.1)
A = Point(xAxis)
C: (0.0, Dolžina)
a_3 = Segment(C, A)
B: (18.0 - Dolžina, 0.0)
mnogokotnik1, a, b, c = Polygon(C, A, B)