הזז מעגל אופקית

עקוב אחר הנקודה P

משוואת המעגל: 

משוואת המעגל המוזז a יחידות:

הצג יחס CP=kPD

A = Point(xAxis)
B = Intersect(xAxis, yAxis)
c = Circle(A, B)
a = 0 (slider from -5 to 7, step 0.1)
A': A + (a, 0.0)
B': B + (a, 0.0)
d = Circle(A', B')
b = true
C = Point(d)
k = 0.6 (slider from 0 to 3, step 0.1)
P: (x(C), k * y(C))
e = false
P': P
text2: d + ""
text3: c + ""
f = Line(C, P)
D = Intersect(f, xAxis)
h = Segment(C, P)
i = Segment(P, D)
text5: "\frac{ CP }{PD } =" + (FractionText[h / i])
g = false