VB程序编写求满足条件1+2+3+…+N>1000的最小N
1个回答
Private Sub Command1_Click()
Dim n As Integer,s As Integer
n = 1
s = 0
While s < 1000
s = s + n
n = n + 1
Wend
MsgBox "最小n是:" & n - 1
End Su
相关问题
最新问答： 在时间的单位上面加平方是什么意思?比如:g=9.8m/s² 世界之最好词好句四字词语 如图所示的实例中，为了减小摩擦的是（ ） 两个定值电阻,甲标有"10Ω,1A",乙标有"15Ω,0.6A"把它们串联起来,两端允许的最高电压是?为什么不能用总电阻 800英语怎么翻译?hundred加不加s?为什么? 一个正方体的边长增加2cm,它的体积增加208立方cm后,仍是一个正方体,则边长增加了几cm? 找一篇初中关于我的家的作文!（急!） 英语翻译我往一个韩国邮箱发了邮件,结果收到了这样的一段回复（我用的yahoo.cn的邮箱）“蓖窍狼 皋老阑 荐脚磊狼 皋 be的单三形式是啥? 相思成灾 前面一句是什么如题到底是什么啊 - - 在△ABC中,∠ACB=90°AC=BC,直线MN经过点C,且AD⊥MN于D,BE⊥MN于E.当MN绕点C旋转到图的位置 三个连续的偶数之和是120，这三个偶数分别是多少？ 干旱的英语小作文 已知定义在R上的函数f（x）、g（x）满足：对任意x，y∈R有f（x-y）=f（x）g（y）-f（y）g（x）且f（1） 找规律：12,4,三分之四,（ ）,（ ） 表示数量很多的四字词语?急 怎样注意交通安全? 分类学家依据生物的形态结构和生理特性将生物进行分类，所设的分类单位最小的是（ ） 七年级下册英语问路的两种句型 不应该吃那么多零食用英语翻译
相关问答： 跪求
