执行如下程序段后,intsum的值为【 】。 Private Sub Command1_Click() sum=0 For i=1 To 18 Step 2 For j=2 To 6

admin2009-03-15  29

问题 执行如下程序段后,intsum的值为【  】。
   Private Sub Command1_Click()
       sum=0
       For i=1 To 18 Step 2
          For j=2 To 6
            If(i Mod j)<>0 Then sum=sum+j
          Next
       Next
       Print sum
   End Sub

选项

答案161

解析 单循环次数r=int((终值-初值+步K)/步长),嵌套循环次数是各层循环次数的乘积。该段程序的循环次数为9×5=45(次),当i不能被j整除时,j的值相加。该段程序中只有以下条件不成立,即3/3、5/ 5、9/3、15/3、15/5,所以计算结果为9×(2+3+4+5+ 6)-(3+5+3+3+5)=161。
转载请注明原文地址:https://kaotiyun.com/show/fW1p777K
0

最新回复(0)