Mediane

A = (5, 2)
B = (-1, 4)
C = (1, -1)
triangolo, c, a, b = Polygon(A, B, C)
bisettrice_C = AngularBisector(B, C, A)
bisettrice_A = AngularBisector(C, A, B)
bisettrice_B = AngularBisector(A, B, C)
I = Intersect(bisettrice_B, bisettrice_A)
D = Intersect(bisettrice_C, c)
d = Circle(I, Segment[I, D])
T1: "incentro: I(" + (x(I)) + ";" + (y(I)) + ")"
α = Angle(c, bisettrice_A)
β = Angle(I, A, C)
γ = Angle(A, C, I)
δ = Angle(I, C, B)
ε = Angle(C, B, I)
ζ = Angle(I, B, A)