A = (3.8687989810000243, 3.141663780687645)
B = (13.14367390659816, 3.0991184828638003)
a = Segment(A, B)
C = Point(a)
abstandAC = Distance(A, C)
TextAC: "\overline{" + (Name[A]) + (Name[C]) + "} \, = \, " + abstandAC
abstandCB = Distance(C, B)
TextCB: "\overline{" + (Name[C]) + (Name[B]) + "} \, = \, " + abstandCB
q1: abstandAC / a
q2: abstandCB / abstandAC