怎么用mathematica做这道函数题?我晕的~~~~

来源:学生作业帮助网 编辑:作业帮 时间:2024/04/29 03:29:32
怎么用mathematica做这道函数题?我晕的~~~~

怎么用mathematica做这道函数题?我晕的~~~~
怎么用mathematica做这道函数题?

我晕的~~~~

怎么用mathematica做这道函数题?我晕的~~~~
第一步画图很简单,就不多少了.
接下来是找解部分,

这是一个超越方程,没有代数解,要在mathematica中求极限很难。

先画图,很简单。
In[16]:= Plot[E^x-Cos[x]==0,{x,-20,0}]
然后运用目测法看出根的个数和大致位置,用FindRoot
In[23]:= FindRoot[E^x-Cos[x]==0,{x,-17}]
Out[23]= {x->-17.2788}
In[22]:= FindRoot[E^x-Cos[x]==0,{x,-15}...

全部展开

先画图,很简单。
In[16]:= Plot[E^x-Cos[x]==0,{x,-20,0}]
然后运用目测法看出根的个数和大致位置,用FindRoot
In[23]:= FindRoot[E^x-Cos[x]==0,{x,-17}]
Out[23]= {x->-17.2788}
In[22]:= FindRoot[E^x-Cos[x]==0,{x,-15}]
Out[22]= {x->-14.1372}
In[24]:= FindRoot[E^x-Cos[x]==0,{x,-12}]
Out[24]= {x->-10.9956}
In[25]:= FindRoot[E^x-Cos[x]==0,{x,-8}]
Out[25]= {x->-7.85359}
In[26]:= FindRoot[E^x-Cos[x]==0,{x,-5}]
Out[26]= {x->-4.72129}
In[27]:= FindRoot[E^x-Cos[x]==0,{x,0}]
Out[27]= {x->0.}
极限可以用三角,等一会

收起

这个 你下载个mathematica的资料啊 我这有 你对着例题套就可以了 需要的话 留个联系方式我发给你