centrKrivoy2por.mws

Центр линии второго порядка

>    restart;

>    with(plots):

>    A:=4:B:=2:C:=4:D1:=-50:E:=-40:

Кривая

>    F:=A*x^2+2*B*x*y+C*y^2+2*D1*x+2*E*y+1;

>    implicitplot(F,x=-10..26,y=-11..21,color=blue);

Общее уравнение кривой

Эллипс

Координаты центра

>    solve({A*x+B*y+D1,B*x+C*y+E},{x,y});

x = 10, y = 5