问题 填空题

设有如下程序:
Private Sub Form_Click()
Dim a As Integer,S As Integer
n=8:S=0
Do
S=S+n:n=n-1
Loop While n>0
Print S
End Sub
以上程序的功能是计算1-8的和。程序运行后,单击窗体,输出结果为 (10)

答案

参考答案:36

解析: Do…While语句的循环运算次数为8次,当n减小到0时跳出循环。所以经运算s=1+2+3+4+5+6+7+8,其结果为36。

单项选择题 A3/A4型题
单项选择题