Mathematica问题
题目
Mathematica问题
设数列{xn}由以下递推关系给出,x1=1/2,x(n+1)=xn^2+xn (n=1,2,3...),观察数列1/(x1+1)+1/(x2+1)+.+1/(xn+1)的极限,用Mathematica实现.
答案
这个题太难了,算到n=20的时候就要算12秒了,N越大需要的时间越长,不过估计结果是2x[n_] := Which[n == 1,1/2,n > 1,x[n - 1]^2 + x[n - 1]]NSum[1/(x[n] + 1),{n,1,20}] // Timing{12.969,2.}再往下算需要的时间太长...
举一反三
已知函数f（x）=x，g（x）=alnx，a∈R．若曲线y=f（x）与曲线y=g（x）相交，且在交点处有相同的切线，求a的值和该切线方程．
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
热门考点