2. 计算机
  3. 现有以下程序： 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

现有以下程序： 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  56
问题 现有以下程序：
    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://www.kaotiyun.com/show/YNhp777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)