\( \DeclareMathOperator{\abs}{abs} \newcommand{\ensuremath}[1]{\mbox{$#1$}} \)
(%i4) |
eq1
:
8
*
x
-
2
*
y
-
1
*
z
=
1
$
eq2 : 9 * x - 4 * y + b * z = - 2 $ eq3 : 2 * x + 1 * y + a * z = 2 $ sol : linsolve([ eq1, eq2, eq3],[ x, y, z]) ; |
(%i5) | linsolve( ev( sol,[ x = 1 / 3, y = 1, z = - 1 / 3]),[ a, b]) ; |
Luego la suma de a+b es
(%i6) | ev( a + b, %) ; |
Created with wxMaxima.
Como la solución del sistema es [1/3,1,-1/3]: