[填空题] 设有如下程序:Private Sub Form_Click()Dim n As Integer, s As Integer n = 8s = 0 Do s = s + n n = n -

13 查阅

[填空题] 设有如下程序:Private Sub Form_Click()Dim n As Integer, s As Integer n = 8s = 0 Do s = s + n n = n - 1Loop While n > 0Print sEnd Sub以上程序的功能是 _________。程序运行后,单击窗体,输出结果为 _________。

参考答案:

求整数 A~H 之和 , CF

Do…Loop While 语句,是先执行循环体,然后再判断条件,当条件表达式为 True 时,继续执行循环 体,当表达式为 False 时,退出循环。本题中先执行一次循环体,即 s+8,n-1,每执行一次循环体,n 就减 1,当 n<=0 时,则退出循环。所以当 n=0 时,结束循环,此时循环体执行了 8 次 n=8+7+6+5+4+3+2+1=36。所以此程序的功能就是求整数 1~8 之和。

计算机考试