[填空题] 设有如下程序:Private Sub Form_Click()Dim n As Integer,s As Integern=8s=0Dos=s+nn=n-1Loop While n>0Pr

21 查阅

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

参考答案:

求整数1~8之和;36

[评析] 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之和。

计算机考试