请问这道题用mathematica能解吗?如果能应该怎么做?

可以呀。In[78]:= Clear[x, y, a, b, c]In[1]:= a = x + yOut[1]= x + yIn[2]:= b = Sqrt@(x^2 + x y + y^2)Out[2]= Sqrt[x^2 + x y + y^2]In[3]:= c = m Sqrt@(x y)Out[3]= m Sqrt[x y]In[4]:= Solve[ c + b == a , m, Reals]Out[4]= {{m ->    ConditionalExpression[(x + y - Sqrt[x^2 + x y + y^2])/Sqrt[    x y], (x > 0 && y > 0) || (x < 0 && y < 0)]}}In[5]:= Solve[ c == a + b, m, Reals]Out[5]= {{m ->    ConditionalExpression[-((-x - y - Sqrt[x^2 + x y + y^2])/Sqrt[     x y]), (x > 0 && y > 0) || (x < 0 && y < 0)]}}故：(x + y + Sqrt[x^2 + x y + y^2])/Sqrt[x y] > m > ( x + y - Sqrt[x^2 + x y + y^2])/Sqrt[x y] 再问： ……可是不对 再答： 真的不对吗？你是要写成下面的形式吗？( x + y - Sqrt[x^2 + x y + y^2])/Sqrt[x y] < m 1, y -> 1}}Maximize[{(x + y - Sqrt[x^2 + x y + y^2])/Sqrt[x y], x > 0 && y > 0}, {x, y}]{2 - Sqrt[3], {x -> 1, y -> 1}}