- Vấn đề tìm hệ số của phương trình đường bậc hai: $$f(x,y)=Ax^2+2Bxy+Cy^2+2Dx+2Ey+F=0$$
- Tính các bất biến $$I_1=A+C; I_2=\left|\begin{array}{ll}A&B\\B&C\end{array}\right| ; I_2=\left|\begin{array}{lcl}A&B&D\\
B&C&E\\D&E&F\end{array}\right|$$
J1:=aa+cc; Resultat:=cat(Resultat,"Bất biến thứ nhất: ","$$ I_1 =",latex(ans()),"$$"); J2:=aa*cc-bb^2; Resultat:=cat(Resultat,"Bất biến thứ hai: ","$$ I_2 =",latex(ans()),"$$"); J3:=det([aa,bb,dd],[bb,cc,EE],[dd,EE,ff]); Resultat:=cat(Resultat,"Bất biến thứ ba: ","$$ I_3 =",latex(ans()),"$$"); - Câu lệnh logic (dòng 1 đưa ra câu lệnh để test, dòng 2 xuất ra kết quả Đúng/Sai).
J2>0 and J3<0; Resultat:=cat(Resultat,"Đường bậc hai là elip: PHẢI (true), KHÔNG (false/0):","$$",latex(ans()),"$$");
aa:= coeff(zz,x,2);
Resultat:=cat(Resultat,"","$ a = ",latex(ans())," $");
bb:=coeff(zz,[x,y],[1,1])/2;
Resultat:=cat(Resultat," , ","$ b=",latex(ans()),"$");
cc:=coeff(zz,y,2);
Resultat:=cat(Resultat," , ","$ c=",latex(ans()),"$");
dd:=coeff(zz,[x,y],[1,0])/2;
Resultat:=cat(Resultat," , ","$ d =",latex(ans()),"$");
EE:=coeff(zz,[x,y],[0,1])/2;
Resultat:=cat(Resultat," , ","$ e =",latex(ans()),"$");
ff:=coeff(zz,[x,y],[0,0]);
Resultat:=cat(Resultat," , ","$ f =",latex(ans()),"$");
Không có nhận xét nào:
Đăng nhận xét