|
|
代码1——Module[{x = Power[(-4 Sqrt[2] + Sqrt[32 - 4 (2/25)^5])/2, (5)^-1]/Sqrt[2] + Power[(-4 Sqrt[2] - Sqrt[32 - 4 (2/25)^5])/2, (5)^-1]/Sqrt[2]}, N[x^5 - x + 1, 20]]
-1.05803044564223380873 - 0.61129665082784211921 I——这个根不是这个方程的根。
代码2——Module[{x = Power[(-4 Sqrt[2] + Sqrt[32 - 4 (2/25)^5])/2, (5)^-1]/Sqrt[2] + Power[(-4 Sqrt[2] - Sqrt[32 - 4 (2/25)^5])/2, (5)^-1]/Sqrt[2]}, N[x^5 - x^3/5 + x/125 + 1, 20]]
-0.14040135160291453678 - 0.20907146208794279084 I——这个根不是这个方程的根。
代码3——Table[Module[{x = -1}, x^5 - a (x + 1) + 1], {a, -9, 9}]
{0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0, 0}——这些根是这些方程的根。 |
|