
Dim sum As Integer ' 定义一个变量来保存求和结果
sum = 0 ' 初始化求和结果为0
For i As Integer = 10 To 300 Step 10 ' 循环10到300,每次增加10
sum = sum + i ' 将当前循环变量的值加入求和结果中
Next
MsgBox "10+20+30+...+300 = " &sum ' d出对话框显示求和结果
上述代码中,首先定义了一个变量sum用来保存求和结果,并将其初始化为0。然后使用For循环从10开始到300,每次增加10,将循环变量的值加入求和结果中。最后使用MsgBox函数d出一个对话框,显示求和结果。
当程序执行完毕后,会d出一个对话框,显示求和结果为"10+20+30+...+300 = 4590"。
答案选择BA
sum=0
for
i=1
to
10
sum=sum+1
next
i
sum
每次都是sum+1,循环10次后sum的值是10,没有进行1+2+3。。d的运算
B
sum=0
i=1
do
while
i<=10
sum=sum+i
i=i+1
loop
sum
第一次sum=0+1
第二次sum=sum+2,因为i=i+1增加了
.
C
sum=sum+1做的是sum=sum+1,相当于每次循环1+1+1+1的了,不是1+2+3+4
D
do
sum=sum+i
i=i+1
loop
until
i<10
这里的条件是loop
until,不是while
当初i<10满足条件后就停止循环了。
欢迎分享,转载请注明来源:内存溢出
微信扫一扫
支付宝扫一扫
评论列表(0条)