求下述表达式的值,直到最后一项的绝对值小于10-6为止.
题目
求下述表达式的值,直到最后一项的绝对值小于10-6为止.
w=1/(1x2)+1/(2x3)+1/(3x4)+…+1/(nx(n+1))
答案
Dim n As Long, w As Single
w = 0
n= 1
Do While n * (n + 1) < 1000000
w = w + 1 / (n* (n + 1))
n=n + 1
Loop
Print w,n
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
- 早睡早起,从不熬夜的英语翻译
- 串联电路中各点的电流之间有什么关系?猜想或假设:
- 朱自清的《背影》作者选取“背影”这个角度来写,哪里好?
- 若在单位长度是1cm的数轴上随意画出一条长2009cm的线段AB,则线段AB盖住的整数点至少有()
- x-2.6+1.25=3.75
- 我需要一篇文章的好词好句的摘抄.要有:10个好词,5个好句加点评,中心,读后感.
- 在我的脑海里有很多难忘的事情.修改病句
- 已知直线y=-2x+b与双曲线y=1/x只有一个公共点A,试求b的值.
- 丙烯酸蒸馏,
- 如果IaI=3,IbI=5,计算Ia+bI-Ia-bI的值
热门考点