M(r,h(r))

r

h(r)

1

5

6

Afficher la courbe représentant h

Modifier r à l'aide du curseur

O = (-20, 0)
c = Circle(O, 6)
A = (-32, 6)
B = (-32, 12)
a = Segment(A, B)
C = Point(a)
r = Distance(A, C)
O': (-20, 6 + r)
b = Segment(A, C)
d = Circle(O', r)
texte1: "r = " + r
D = (-20, 6)
e = Segment(O', D)
S: (-20, 6 * (6 + r) / (6 - r))
f = Ray(O, O')
g, h = Tangent(S, d)
E = Intersect(g, i)
F = Intersect(h, i)
j = Ray(E, S)
k = Ray(F, S)
P' = Intersect(d, j)
Q' = Intersect(d, k)
P, G = Intersect(c, j)
Q, J = Intersect(c, k)
texte2: "h(r) = " + (6 * (6 + r) / (6 - r))
liste1 = Sequence((4 * k, 0), k, 1, 6)
liste2 = Sequence((0, h), h, 0, 50, 5)
M: (4 * r, 6 * (6 + r) / (6 - r))
I = Point(liste1)
K: (4 * r, 0)
H: (0, 6 * (6 + r) / (6 - r))
l = Segment(H, M)
m = Segment(M, K)
n = Segment(S, H)
lieu1 = Locus(M, C)
o = false
p = Ray((0, 0), (0, 1))
q = Ray((0, 0), (1, 0))