有如下程序: Private Sub Commandl_Click() Dim i As Integer,j As Integer,sum As Integer n=1 Do j=1 Do sum

admin2020-04-18  25

问题 有如下程序:
Private Sub Commandl_Click()
    Dim i As Integer,j As Integer,sum As Integer
    n=1
    Do j=1
       Do
          sum=sum+j:j=j+1 Printj;
       Loop Until i>3
       n=n+2
    Loop Until n>10
    Print sum
End Sub
    运行上述程序,外层Do循环执行的次数为

选项 A、4
B、5
C、7
D、10

答案B

解析 外循环的控制条件为n>10,即n>10的时候结束循环;在每次内循环中j都会自加,i>3的时候退出内循环,即每次外循环中内循环都会执行3次;由于内循环没有改变n的值,而在外循环中n的值自加2,所以外循环共循环5次。
转载请注明原文地址:https://jikaoti.com/ti/lPx0FFFM
0

最新回复(0)