Soustavy algebraických rovnic
Řešte dané soustavy rovnic. Proveďte zkoušku!
Použijte příkazy: solve, wximplicit_plot, ev
a) 2*x-3*y+z=0, x+2*y-z=3, 2*x+y+z=12
| (%i1) | ra1:2*x-3*y+z=0; ra2:x+2*y-z=3; ra3:2*x+y+z=12; |
_img/Soustavy_algebraickych_rovnic.wxm)_0.png)
| (%i4) |
load(draw)$ wxdraw3d(surface_hide=true, color=violet,implicit(ra1,x,-10,10,y,-10,10,z,-10,10), color=pink,implicit(ra2,x,-10,10,y,-10,10,z,-10,10), color=brown,implicit(ra3,x,-10,10,y,-10,10,z,-10,10), dimensions=[400,400] ); |
_img/Soustavy_algebraickych_rovnic.wxm)_1.png)
| (%i6) | res:solve([ra1,ra2,ra3],[x,y,z]); |
_img/Soustavy_algebraickych_rovnic.wxm)_2.png)
| (%i7) | ev([ra1,ra2,ra3],res); |
_img/Soustavy_algebraickych_rovnic.wxm)_3.png)
| (%i8) | linsolve([ra1,ra2,ra3],[x,y,z]); |
_img/Soustavy_algebraickych_rovnic.wxm)_4.png)
x^2+2*y^2-2=0, x^2+x*y+y^2-2=0
| (%i9) | rb1:x^2+2*y^2-2=0; rb2:x^2+x*y+y^2-2=0; |
_img/Soustavy_algebraickych_rovnic.wxm)_5.png)
| (%i11) | res:solve([rb1,rb2],[x,y]); |
_img/Soustavy_algebraickych_rovnic.wxm)_6.png)
| (%i12) |
load(implicit_plot)$ wximplicit_plot ([rb1,rb2], [x, -2, 2],[y, -2, 2],[gnuplot_preamble, "set size ratio 1/1;"]); |
_img/Soustavy_algebraickych_rovnic.wxm)_7.png)
| (%i14) | ev([rb1,rb2],res); |
_img/Soustavy_algebraickych_rovnic.wxm)_8.png)