| ■No23246に返信(さくらんさんの記事) > =(x+1/x)^2-2x*1/x(-2) > とありますが、なんで > (x+1/x)^2-2x*1/x(-2)のところの最後に-2がでてくるんでしょうか?
すでに指摘されたように、()が不要です;引く2
ついでに;
In[24]:= f1 = x + 1/x - 2*Sqrt[2]; f2 = x - 1/x - k; GroebnerBasis[{f1, f2}, {x, y, k}, CoefficientDomain -> RationalFunctions]
Out[26]= {-4 + k^2, 2*Sqrt[2] + k - 2*x, -2*Sqrt[2] + k + 2/x}
In[27]:= Solve[% == {0, 0, 0}, {x, k}]
Out[27]= {{k -> -2, x -> -1 + Sqrt[2]}, {k -> 2, x -> 1 + Sqrt[2]}}
|