O = (6, 2)
r = 3 (slider from 0 to 10, step 0.1)
k = Circle(O, r)
text1: k + ""
A = Point(Circle[O, r])
a = Segment(O, A)
text2: r + ""

Tool: Magasságpont
Add meg a háromszög csúcspontjait!
Input: A, B, C
Output: M

poly1, c, a, b = Polygon(A, B, C)
d = OrthogonalLine(A, a)
e = OrthogonalLine(C, c)
M = Intersect(d, e)