B = (1.4312158046572376, -0.8482643562692685)
C = (13.600178397036231, -0.6526218708612461)
a = Segment(B, C)
C_1 = (-5.377142687541942, 7.212206042541254)
b = Line(C_1, a)
A = Point(b)
c = Segment(A, B)
d = Segment(A, C)
e = Line(B, C)
f = OrthogonalLine(A, e)
H = Intersect(f, e)
g = Segment(A, H)
khoangcachAH = Distance(A, H)
Văn bảnAH: "\overline{" + (Name[A]) + (Name[H]) + "} \, = \, " + khoangcachAH
A' = Point(b)
h = OrthogonalLine(A', e)
H' = Intersect(e, h)
i = Segment(A', H')
j = Segment(B, A')
k = Segment(A', C)
khoangcachA'H' = Distance(A', H')
Văn bảnA'H': "\overline{" + (Name[A']) + (Name[H']) + "} \, = \, " + khoangcachA'H'