A = (-2, 1)
λ = 0.3 (slider from -5 to 5, step 0.1)
a: y - 1.0 = λ * (x + 2.0)
B = Intersect(xAxis, a)
C = Intersect(yAxis, a)
απόστασηAC = Distance(A, C)
ΚείμενοAC: "\overline{" + (Name[A]) + (Name[C]) + "} \, = \, " + απόστασηAC
απόστασηAB = Distance(A, B)
ΚείμενοAB: "\overline{" + (Name[A]) + (Name[B]) + "} \, = \, " + απόστασηAB