1樓：
所以關鍵是找到分母所滿足的乙個有理係數多項式，例如使用以下命令：
MinimalPolynomial[Sqrt[2] + Sqrt[3] + Sqrt[5], x]
得到（記為）。
這說明是方程的乙個根。
由變形可得：
，於是可以將代入上式，獲得的有理表達：
FullSimplify[(960 x - 352 x^3 + 40 x^5 - x^7)/576
/. ]
結果是：
附贈mathematica code（僅輸入分母即可）：
RationalizeDenominator[denominator_] := Module[,
f = MinimalPolynomial[denominator, x];
= PolynomialQuotientRemainder[f, x, x];
result = (-q/r) /. // Factor;
result]
2樓：
Mathematica裡面確實沒有分母有理化的函式，Wolfram Alpha似乎可以的。Maple和Maxima是有內建函式的，分別是rationalize和trigrat。
下面的方法只適用於簡單情況
//. 1/(a_+b_):>(a-b)/Expand[a^2-b^2]//Expand//Together
r=1/(Sqrt[2]+Sqrt[3]+Sqrt[5]+Sqrt[6]);
%/. 1/(a_+b_+c_+d_):>(a+b-c-d)/Expand[(a+b)^2-(c+d)^2]
%//. 1/(a_+b_):>(a-b)/Expand[a^2-b^2]//Expand//Together
%==r
你喜歡用 Mathematica 畫圖嗎？
鄭劍豪 由於發現mma的排版功能也不錯，我經常用mma寫作業，然後國內對這個軟體普及率很低，所以老師也看不出來我用啥完成的，常常作業可以拿A啥的 似乎引發了些許關注，那麼我就 show 一下怎樣用 ComplexPlot 畫二維 靜 電場和電勢吧。稍微有一些數學背景可參見 Section 7.2,F...
用Mathematica計算定積分，結果出現虛數是什麼原因？
寒鴉 根號裡面有負數時 不管幾次根 開出的結果都會出現複數。你可以看下我的乙個提問，很相似的。這個問題在Python中同樣出現。 dice16383 我這可是一模一樣打進去的，版本是12.1。十分懷疑是你函式f沒有Clear，導致這次計算的時候還是用的你之前的函式定義.Ps.幸虧我系統多，仨系統ma...
Mathematica或matlab怎麼求解含有復變數的方程？
這題其實有解析解 一般常規的代數方程用一些cas計算器模擬器更方便，比如Ti nspire cas的模擬器。使用csolve函式即可求解。其中 特別的，如果 紐澤西管風琴 Solve 0.1 2 Im Sqrt 10.9 I x x Reals,x 將常數改為精確的數就可以得到解析解。Solve 1...