2. 计算机
  3. 设有如下程序： Private Sub Form_Click() Dim n As Integer，s As Integer n=8 s=0 Do s=s+n n=n-1 Loop While n＞0 Print s End Sub 以上程序的功能是【

设有如下程序： Private Sub Form_Click() Dim n As Integer，s As Integer n=8 s=0 Do s=s+n n=n-1 Loop While n＞0 Print s End Sub 以上程序的功能是【

admin2009-02-10  33
问题 设有如下程序：
Private Sub Form_Click()
Dim n 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…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之和。
转载请注明原文地址:https://www.kaotiyun.com/show/gd2p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)