作业帮 > 数学 > 作业

VB题 枚举算法 请计算自然数100以内的能被3整除的偶数的个数.

来源:学生作业帮 编辑:作业帮 分类:数学作业 时间:2024/05/15 18:02:39
VB题 枚举算法 请计算自然数100以内的能被3整除的偶数的个数.
Dim i As Long
Dim Count As Long
For i = 1 To 100
If (i Mod 3 = 0) And (i Mod 2 = 0) Then
Count = Count + 1
Debug.Print i
End If
Next
MsgBox Count
答案是16
两个条件,能被3整除并且是偶数
再问: 答案应该是33
再答: 如果0 要算进去那正确答案是17个 如何才能算到.33 这个答案呀.
再问: 你一定算错了,33是标准答案
再答: 两个条件,能被3整除并且是偶数 这是你给的两个条件呢
再问: 实在不好意思,我题目打错了,前一百个偶数