赞 supertian_ya 春芽
共回答了19个问题采纳率：84.2% 举报
似乎没有解析解法,但是可以使用FindRoot,.也就是说,先用Plot画图观察一下：
Plot[Sin[x]*Sinh[x] + 1,{x,-10,10}]
看出来似乎3附近有解,那么：
ans = FindRoot[Sin[x]*Sinh[x] + 1,{x,3}]
(* {x -> 3.22159} *)
反代检查：
Sin[x] Sinh[x] + 1 /.ans
(* 3.33067*10^-16 *)
误差非常小.
Plot[Sin[x]*Sinh[x] + 1,{x,-10,10}]
看出来似乎3附近有解,那么：
ans = FindRoot[Sin[x]*Sinh[x] + 1,{x,3}]
(* {x -> 3.22159} *)
反代检查：
Sin[x] Sinh[x] + 1 /.ans
(* 3.33067*10^-16 *)
误差非常小.
1年前
8
可能相似的问题
-
1年前5个回答
-
1年前1个回答
-
（2007•盐城）计算：|−2|−中+(−2)0−(12)−1
1年前1个回答
-
1年前2个回答
-
一元一次方程计算题 1.方程中含有三项.2.至少有两项含有字母.
1年前1个回答
-
1年前1个回答
你能帮帮他们吗