题目
用VB计算 S=1+1/2+1/4+1/7+1/11+1/16+1/22+1/29+…当i项值
提问时间:2020-07-22
答案
Private Sub Command1_Click() Dim m As Integer,n As Integer,s,result 'm为分母变量,n为位置变量,s为数值变量,result为和的变量 m = 1:n = 0:s = 1 / m:result = 0 + 1 / 1 Do While s >= 10 ^ -4 n = n + 1 m = m + n s = 1 / m result = result + s Loop MsgBox "S=1+1/2+1/4+1/7+1/11+1/16+1/22+1/29+… " & vbCrLf & "运算结果为:" & result,vbOKOnly,"运算结果" End Sub
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
- 1某地去年的电价为0.8元,年用电量
- 2你知道下列声音是怎样产生的?悠扬的短笛声---- “哗哗”的瀑布声---- 风吹树叶的“沙沙”声---
- 3钻石主要成分是碳,那么和煤炭的碳有什么区别?
- 4在下面算式合适的地方,添上加减乘除符号或者括号,让算式成立.“4 4 4 4=5”
- 5矢量和标量的算法有什么不同?
- 6I could not answer the question, _____ I had not prepared my lessons well
- 7用英语写作(200字左右) 抽烟对我们的健康非常有害.还有其他的原因,应该戒烟.戒烟不容易但是戒烟.
- 8"露天咖啡座"英语怎么说?
- 9已知直线l:y-kx-2和两点p(1,2) q(-4,1),若L与线段PQ相交,求k的取值范围
- 10若a2−3a+1+b2+2b+1=0,则a2+1/a2−|b|=_.
热门考点
- 1求解一个五阶行列式,要详细过程.
- 2电梯是匀速上升还是加速上升
- 3一道关于数列的题
- 4i have planned to stay at home同义句i have planned(3空)
- 5I asked Kathy to help me with my English ,but she r_____.
- 6为中华之崛起而读书这个故事有什么感受?
- 7急,三角函数题求解
- 8甲、乙两沿运动场的跑道跑步,甲每分钟跑290米,乙每分钟跑270米,跑到一圈400米.如果两人同时从起跑线上同方向跑,那么甲经过多长时间才能第一次追上乙?(写出等量关系和线段图)
- 9试用"如果------如果-------"或"谁不愿意------谁不愿意------"的句式写几句诗,表达一种企盼
- 10还有什么关于秋天的词语