题目
用VB编写 VB计算公式S=1+1/3+1/5+1/7+.+1/2n-1的和,当第n项的值
提问时间:2020-12-28
答案
Private Sub Command1_Click()
Dim sum As Double
Dim i As Long
Dim n As Double
n = ((1 / (10 ^ -5)) + 1) / 2 '正好等于10 ^ -5时候n的值
n = Round(n + 0.5, 0) '对n+0.5进行四舍五入处理,保证n只要有小数点后面有数就进,不舍.
For i = 1 To n '计算n项的和
sum = sum + 1 / (2 * i - 1)
Next i
Print "项数n为:" & n
Print "n项和为:" & sum
End Sub
调试如下图:
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
最新试题
- 11.3/4+3/4+.+3/4(2008个3/4)
- 2Many of our fears are tissue-paper-thin,and a single courageous step would carry us clear through
- 3请问作为质粒等这些运载体的宿主,除了大肠杆菌可以作为宿主外,还有别的什么可以作为宿主吗?
- 4Grace这个英文名在英国有何意义?在人们印象中是怎样的?
- 5解释诗句中加点字词的意思
- 6what are you going to do this weekend 怎么回答
- 7英语作文(关于假冒伪劣产品)
- 8浪漫主义文学的特点是什么?
- 9求翻译.One sweater in a snake,Two sweaters in a snake,Three sweaters in a snake.
- 10什么科学家发明了什么观察了什么东西
热门考点
- 12x(4乘X)+5乘X=299 怎么解
- 2在(x-1)(x³+6x²+12x+8)³的展开式中,含x的五次方项的系数是_____
- 3编程:生成三位正整数,它能被7整除,且十位数等于5
- 4把乱句子排列成通顺的一段话怎样做
- 5一杯纯牛奶,喝去30%后,加满水,搅匀后再喝去50%,这时杯中的纯牛奶占杯子容量的_%.
- 6生态系统能量不断循环流动的主要原因
- 7噪声是一种严重的环境污染.李明想制作一个防噪声的耳罩,他通过比较几种材料(衣服、锡箔纸、泡沫塑料)的隔音性能来选择一种隔音性能好的材料作耳罩的填充物.实验材料除了待检
- 8关于x的方程 5x-2a-1=x与7x=3(a- 5/3x)-3有相同的解,则(a-1)的平方的值为?
- 9they are改成第三人称单数形式
- 10英语翻译