dati 3 punti P,Q,R
(disegni segmenti e punti medi A,B,C)
equazione(A-B)*(B-C)*(C-A)=0
curvatriangolo(P,Q,R,equazione
disegna tre mediane
equazione curva implicita(h)

P = Intersect(xAxis, yAxis)
Q = Point(xAxis)
R = (3, 5)
h = TriangleCurve(P, Q, R, (A - B) * (B - C) * (C - A) = 0)
a = Segment(P, R)
i = Segment(P, Q)
j = Segment(Q, R)
A = Midpoint(a)
B = Midpoint(j)
C = Midpoint(i)