A = (-1.58, 0.56)
B = (6.214511627906977, 0.5404651162790707)
C = (0.84, 4.34)
t1, c, a, b = Polygon(A, B, C)
f = AngularBisector(C, A, B)
g = AngularBisector(A, B, C)
h = AngularBisector(A, C, B)
O = Intersect(f, g)
i = OrthogonalLine(O, c)
D = Intersect(i, c)
kaugusOD = Distance(O, D)
Midpoint(O, D)
pikkusOD: Name[O] + (Name[D]) + " = " + kaugusOD
r = Segment(O, D)
kaugusAC = Distance(A, C)
Midpoint(A, C)
TekstAC: Name[A] + (Name[C]) + " = " + kaugusAC
kaugusAB = Distance(A, B)
Midpoint(A, B)
TekstAB: Name[A] + (Name[B]) + " = " + kaugusAB
kaugusBC = Distance(B, C)
Midpoint(B, C)
TekstBC: Name[B] + (Name[C]) + " = " + kaugusBC
Punktt1 = PointIn(t1)
Tekstt1: "S_{ABC} = " + (LaTeX[t1]) + ""