 | 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}}
３の４；
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}}
世界の 誰も 云わないような 難しげな 解答 で ゴメンナサイ
（ 自分で解いて コタエが あってる か
かくにん 用 に お願い いたします）
|
