如何用Mathematica解一下两题1,求数列X1=2,Xn=见下图的极限.并画出数列散点图,列出数列值的表并求极限.2,数列_数学解答

如何用Mathematica解一下两题
1,求数列X1=2,Xn=见下图的极限.并画出数列散点图,列出数列值的表并求极限.
2,数列C0=C1=C2=1,C(n+1)=C(n-1)+C(n-2)【上三个括号里的为下标】 (n>=2)求出数列的前50项
是Mathematica4.0版的……要整个过程的

人气：371 ℃　时间：2020-09-04 14:07:46

解答

data = NestList[Sqrt[2 + Sqrt[1 #]] &,2,100] // N(*获得嵌套数列的离散值*)ListPlot[data,Joined -> True](*输出数列规律*)Solve[x == Sqrt[2 + Sqrt[x]],x] // N(*求解方程,获得极限*){{x -> 1.83118}}为数列的...