Pravokotnik

A = (-2, -1)
B = (4.62, 0.66)
a = Segment(A, B)
b = OrthogonalLine(B, a)
C = Point(b)
c = Line(C, a)
d = Line(A, b)
D = Intersect(c, d)
mnogokotnik1, a_1, b_1, c_1, d_1 = Polygon(A, B, C, D)