现有以下程序: Private Sub Commandl Click() cl=0 c2=0 For i=l To 100 If i Mod 3=0 Then cl=el+1 Else If i Mo

admin2012-12-21  21

问题 现有以下程序:
    Private Sub Commandl Click()
    cl=0
    c2=0
    For i=l To 100
    If i Mod 3=0 Then
    cl=el+1
    Else If i Mod 7=0 Then
    c2=c2+1
    End If
    Next i
    Print cl+c2
    End Sub
    此程序运行后输m的是在1~100范围内(    )。
  

选项 A、同时能被3和7整除的整数个数
B、能被3或7整除的整数个数(同时被3和7整除的数只记一次)
C、能被3整除,而不能被7整除的整数个数
D、能被7整除,而不能被3整除的整数个数  

答案B

解析 i是1到100的循环,在程序中,对3和7取模.显然就是3和7的倍数关系。需要注意的是If和else语句分别判断3和7的倍数而同时是21倍数的时候会不计,这有别于传统的计数方法。
转载请注明原文地址:https://kaotiyun.com/show/YNhp777K
0

最新回复(0)