有如下程序: Private Sub Form_Click()   Dim i As Integer, n As Integer   For i=1 To 20     i=i+4     n=n+i     If i>10 Then Exit For  

admin2019-06-20  39

问题 有如下程序:
Private Sub Form_Click()
  Dim i As Integer, n As Integer
  For i=1 To 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=11+4=15,n=n+i=15+15=30,此时,i=15,i>10成立,退出循环。此时n=30。
转载请注明原文地址:https://jikaoti.com/ti/9lN0FFFM
0

最新回复(0)