In[1]:= Clear[n,s]
s[n_]:=1000*(1+0.05/n)^n
In[2]:=Plot[s[n],{n,4,100}] 作函数s的图
In[3]:=Limit[s[n],n->Infinity] 求n趋于无穷大时s的极限
Out[3]:=1051.27
【Mathematica】Mathematica Plot的用法
In[1]:= Clear[n,s]
s[n_]:=1000*(1+0.05/n)^n
In[2]:=Plot[s[n],{n,4,100}] 作函数s的图
In[3]:=Limit[s[n],n->Infinity] 求n趋于无穷大时s的极限
Out[3]:=1051.27