VzdialenostBodov

Klikni na dva body

(y * y(B)) = (-((x(B))^(2) + (y(B))^(2) + (x(B) * x) + 1))
(y * y(A)) = (-((x(A))^(2) + (y(A))^(2) + (x(A) * x) + 1))
C = Intersect(a, b)
d: x(C)
e: y(C)
D: (((-d)) / 2, ((-e)) / 2)
f = Circle(D, A)
E = Point({Intersect[x^(2) + y^(2) = 1, f]}, If[Angle[B, D, A] < 180°, 1, 0])
F = Point({Intersect[x^(2) + y^(2) = 1, f]}, If[Angle[B, D, A] < 180°, 0, 1])
g = Ray(B, A)
h = Ray(A, B)
G = Intersect(x^(2) + y^(2) = 1, g)
H = Intersect(x^(2) + y^(2) = 1, h)
I = If(Defined[D], E, G)
J = If(Defined[D], F, H)
VzdialAI = Distance(A, I)
VzdialAJ = Distance(A, J)
VzdialBI = Distance(B, I)
VzdialBJ = Distance(B, J)
j = If(VzdialAI ≟ 0 ∨ VzdialAJ ≟ 0 ∨ VzdialBI ≟ 0 ∨ VzdialBJ ≟ 0, Infinity, abs(ln(((VzdialBI * VzdialAJ)) / ((VzdialAI * VzdialBJ)))))
K = Midpoint(A, B)
text1: "" + (LaTeX[j]) + ""