设有如下程序: 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

admin2010-11-20  32

问题 设有如下程序:
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的和。程序运行后,单击窗体,输出结果为______。

选项

答案36

解析 Do…While语句的循环运算次数为8次,当n减小到0时跳出循环。所以经运算s=1+2+3+4+5+6+7+8,其结果为36。
转载请注明原文地址:https://kaotiyun.com/show/zpmp777K
0

最新回复(0)