| In[29]:= f1 = y - (2*x + 4); f2 = y - (7*x + a*3); GB = GroebnerBasis[{f1, f2}, {x, y}]
Out[31]= {28 - 6*a - 5*y, -4 + 3*a + 5*x}
In[32]:= Solve[% == {0, 0}]
Out[32]= {{a -> 14/3 - (5*y)/6, x -> -2 + y/2}}
3の4;
In[33]:= % /. {x -> -1, y -> b}
Out[33]= {{a -> 14/3 - (5*b)/6, -1 -> -2 + b/2}}
In[34]:= Solve[{a == 14/3 - (5*b)/6, -1 == -2 + b/2}, {a, b}]
Out[34]= {{a -> 3, b -> 2}}
世界の 誰も 云わないような 難しげな 解答 で ゴメンナサイ
( 自分で解いて コタエが あってる か かくにん 用 に お願い いたします)
|