Tracé de l'ellipse et de ABC

> with(plots):

>c:=implicitplot(Equation(AB,[X,Y]),X=-5..5,Y=-5..5):b:=implicitplot(Equation(AC,[X,Y]),X=-5..5,Y=-5..5):a:=implicitplot(Equation(BC,[X,Y]),X=-5..5,Y=-5..5):

> d:=plot([op(elli[2])[2],op(elli[1])[2], k=-infinity..infinity],numpoints=100,color='blue' ):

> display({a,b,c,d});