有如下程序: Private Sub Form—Click() Dim i As Integer,n As Integer For i=1 T0 20 i=i+4 n=n+i If i>10 Then Exit For Next Print n End S

admin2017-12-13  31

问题 有如下程序:
Private Sub Form—Click()
Dim i As Integer,n As Integer
For i=1 T0 20
i=i+4
n=n+i
If i>10 Then Exit For
Next
Print n
End Sub
程序运行后,单击窗体,则输出结果是(    )。

选项 A、14
B、15
C、29
D、30

答案D

解析 程序中For循环中的If语句判断循环变量i值如果大于10则退出循环。各次循环变量值变化如下:
i=1时,i=i+4=1+4=5,n=n+i=0+5=5,此时i=5,i>10不成立,i加1转入下次循环。
i=6时,i=i+4=6+4=10,n=n+i=5+10=15,此时,i=10,i>10不成立,i加1转入下次循环。
i=11时,i=i+4=1 1+4=15,n=n+i=15+15=30,此时,i=15,i>10成立,退出循环。此时n=30。
转载请注明原文地址:https://jikaoti.com/ti/twy0FFFM
0

最新回复(0)