Reset

x=0.80

Aire=3.36

Animation

A = (0, 0)
B = (2, 0)
H = Point(Segment[A, B])
a = Distance(A, H)
C = (2, 2)
D = (0, 2)
I: (a, a)
J: (0, a)
poly1, h, b, c, d, j, i = Polygon(H, B, C, D, J, I)
e = Segment(J, A)
animation = 0