Sestrojte ve zvolené polorovině všechny pravoúhlé trojúhelníky ABC, 
je-li dána jejich přepona AB a výška v na přeponu.

A = (-1.12, -1.03)
B = (5.66, -1.03)
v = 3 (slider from 0 to 5, step 0.1)
a = Segment(A, B)
S = Midpoint(A, B)
k = Circle(S, A)
k_1 = Semicircle(A, B)
b = OrthogonalLine(A, a)
c = Circle(A, v)
E = Intersect(c, b, 2)
F = Intersect(c, b, 1)
d = Line(E, a)
C_2, C_1 = Intersect(k, d)
mnohoúhelník2, c_1, a_2, b_2 = Polygon(A, B, C_1)
mnohoúhelník1, c_2, a_1, b_1 = Polygon(A, B, C_2)