设有如下程序: Private Sub Command1_Click( ) Dim c As Integer,d As Integer c=4 d=I

admin2013-01-23  29

问题 设有如下程序:            Private Sub Command1_Click(    )              Dim c As Integer,d As Integer              c=4              d=InputBox(“请输入一个整数”)              Do While d>0                  If d>c Then                     C=C+1                  End lf                  d=InputBox(“请输入一个整数”)              Loop              Print c+d            End sub              程序运行后,单击命令按钮,如果在输入对话框中依次输入1、2、3、4、5、6、7、8、9、0,则输出结果是

选项 A、12
B、11
C、10
D、9

答案8

解析 本题中最后输入0时结束循环,所以最后d的值为0,故判断输出结果其实就是计算c的值,c从输入5开始(除最后的0)每次加1(共5次),所以c最后为9。
转载请注明原文地址:https://kaotiyun.com/show/vchp777K
0

最新回复(0)