有关mathematica Solve[x - ArcSin[Sin[x + 0.1364]/Sqrt[(1880/178)^2 + 1 - 3760/178*Cos[x + 0.1364]]] - ArcCos[(1880/178*(2*Cos[x] - Cos[x + 0.1364] - Cos[2*x]))/Sqrt[(1880/178)^2 + 1 - 3760/178*Cos[x + 0.1364]]] == -89.8635,x]我这个公式怎么

有关mathematica Solve[x - ArcSin[Sin[x + 0.1364]/Sqrt[(1880/178)^2 + 1 - 3760/178*Cos[x + 0.1364]]] - ArcCos[(1880/178*(2*Cos[x] - Cos[x + 0.1364] - Cos[2*x]))/Sqrt[(1880/178)^2 + 1 - 3760/178*Cos[x + 0.1364]]] == -89.8635,x]我这个公式怎么
有关mathematica
Solve[x -
ArcSin[Sin[x + 0.1364]/
Sqrt[(1880/178)^2 + 1 - 3760/178*Cos[x + 0.1364]]] -
ArcCos[(1880/178*(2*Cos[x] - Cos[x + 0.1364] - Cos[2*x]))/
Sqrt[(1880/178)^2 + 1 - 3760/178*Cos[x + 0.1364]]] == -89.8635,x]
我这个公式怎么求解不出答案啊,记事本最上状态栏一直显示正在运行,但是都得不出答案,感激不尽啊.

有关mathematica Solve[x - ArcSin[Sin[x + 0.1364]/Sqrt[(1880/178)^2 + 1 - 3760/178*Cos[x + 0.1364]]] - ArcCos[(1880/178*(2*Cos[x] - Cos[x + 0.1364] - Cos[2*x]))/Sqrt[(1880/178)^2 + 1 - 3760/178*Cos[x + 0.1364]]] == -89.8635,x]我这个公式怎么
我看你这个是想求一个数值解吧,请用NSolve求解,或者用FindRoot函数求解,FindRoot函数求解的时候,要指定根的位置.
这些知识应该老师上课的时候有讲吧,如果你对微积分和线性代数的知识没有了解,用mathematica 是很痛苦的事情.当然在使用过程中你自己慢慢摸索,你也会逐渐知道哪些问题微积分可以解哪些不可以解.
如果Solve函数能直接求出这个这个方程的解,那一定是利用了超出人类理解范畴的外星文明科技吧.如果你不明白我的这句话,可以买本《代数的历史》或者类似的书看看,你就知道人类研究了几千年的数学之后,目前能够求解的方程只是很有限的几种而已.