当前位置: > vb计算S=1*2+2*3+3*4+.N*(N+1)直到和大于5000停止,输出结果及N的值....
题目
vb计算S=1*2+2*3+3*4+.N*(N+1)直到和大于5000停止,输出结果及N的值.

提问时间:2020-10-11

答案
Private Sub Command1_Click()Dim N As Long,S As LongDoN = N + 1S = S + N * (N + 1)If S > 5000 Then Exit DoLoopPrint "结果=" & SPrint " N =" & NEnd Sub'结果=5200'N=24请参考.
举一反三
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
奥巴马演讲不用看稿子.为什么中国领导演讲要看?
想找英语初三上学期的首字母填空练习……
英语翻译
1,人们染上烟瘾,最终因吸烟使自己丧命.
版权所有 CopyRight © 2012-2019 超级试练试题库 All Rights Reserved.