Mocnost bodu ke kružnici - motivace
Date: 21 Červenec 2013

Y = (1, 1)
S = (3, 3)
M = (6.769907104660379, 1.4868386053467473)
k = Circle(S, 2)
A = Point(k)
i = Line(M, A)
B = Intersect(k, i, 2)
p = Circle(M, B)
j = OrthogonalLine(M, i)
I = Intersect(p, j, 1)
J, K = Intersect(p, j)
l = OrthogonalLine(I, j)
n = OrthogonalLine(A, i)
L = Intersect(l, n)
P, g_1, f_1, i_1, l_1 = Polygon(A, M, I, L)
a = Segment(M, B)
b = Segment(I, M)
Pl: g_1 * b
text1: "P=|MA|·|MB|=" + (LaTeX[g_1]) + "·" + (LaTeX[b]) + "=" + (LaTeX[P]) + ""