Mathematica数学实验求根

来源：学生作业帮编辑：作业帮分类：数学作业时间：2024/05/27 18:14:21

Mathematica数学实验求根
作出函数f（x）= ex-cosx的图形；求出方程f(x)=0 在[-20,0]的所有根；令为从0向左依次排列的方程的根,输出 xn-1-xn ,并指出 lim(xn-1-xn),下面还有个N趋于无穷大

f[x_] := Exp[x] - Cos[x]
Plot[f[x],{x,-20,20},AxesLabel -> {"x","f(x)"},PlotRange -> All]
Plot[f[x],{x,-20,0}]
{FindRoot[f[x] == 0,{x,-20}],FindRoot[f[x] == 0,{x,-17.5}],
FindRoot[f[x] == 0,{x,-15}],FindRoot[f[x] == 0,{x,-10}],
FindRoot[f[x] == 0,{x,-5}],FindRoot[f[x] == 0,{x,0}]}
Reverse[Drop[%,1]]
{{x -> 0.},{x -> -4.72129},{x -> -10.9956},{x -> -14.1372},{x -> \
-17.2788}}
以上符合题意不?

MATHEMATICA数学实验 mathematica数学实验报告急求答案!Mathematica数学实验练习题1 数学求根公式数学二元一次方程求根公式数学的求根公式是什么? 这个Mathematica数学程序咋编呢? 初中数学一元二次方程求根公式 mathematica 数学求根公式我想知道分解因式的求根公式法的公式是什么关于数学软件Mathematica的设置问题! 初三数学求根公式中三角形符号怎么读