2个回答
展开全部
用 Mathematica 吧
参考:
http://hi.baidu.com/tk999999/blog/item/207e6d2a90439229d42af1cc.html
(*
绘制函数y = cos(5x + 2)/sin(3x + 1) 的图像,并求解当 x = 2 时的函数值。
*)
Plot[Cos[5x + 2] , {x, (-2 - Pi/2)/5 - Pi/5, (-2 + Pi/2)/5 + (3*Pi)/5}]
Plot[Sin[3x + 1] , {x, (-2 - Pi/2)/5 - Pi/5, (-2 + Pi/2)/5 + (3*Pi)/5}]
Plot[Cos[2 + 5*x]*Csc[1 + 3*x], {x, (-2 - Pi/2)/5 - Pi/5, (-2 + Pi/2)/5 + (3*
Pi)/5}]
ReplaceAll[Cos[2 + 5 x] Csc[1 + 3 x], x -> 2]
N[ReplaceAll[Cos[2 + 5 x] Csc[1 + 3 x], x -> 2]]
(图形见参考地址)
Cos[12] Csc[7]
1.28443
参考:
http://hi.baidu.com/tk999999/blog/item/207e6d2a90439229d42af1cc.html
(*
绘制函数y = cos(5x + 2)/sin(3x + 1) 的图像,并求解当 x = 2 时的函数值。
*)
Plot[Cos[5x + 2] , {x, (-2 - Pi/2)/5 - Pi/5, (-2 + Pi/2)/5 + (3*Pi)/5}]
Plot[Sin[3x + 1] , {x, (-2 - Pi/2)/5 - Pi/5, (-2 + Pi/2)/5 + (3*Pi)/5}]
Plot[Cos[2 + 5*x]*Csc[1 + 3*x], {x, (-2 - Pi/2)/5 - Pi/5, (-2 + Pi/2)/5 + (3*
Pi)/5}]
ReplaceAll[Cos[2 + 5 x] Csc[1 + 3 x], x -> 2]
N[ReplaceAll[Cos[2 + 5 x] Csc[1 + 3 x], x -> 2]]
(图形见参考地址)
Cos[12] Csc[7]
1.28443
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询