作业帮 > 综合 > 作业

VB编程求1到1000中能被3整除的数的个数

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/04/29 14:11:40
VB编程求1到1000中能被3整除的数的个数
在[1~1000]区间中的所有整数中,分别计算能被3整除的数的个数及能被7整除的数的个数,结果显示如题所示.要求:必须使用循环语句实现
dim num3,num7 as integer
for i=1 to 1000
if i mod 3=0 then
num3=num3+1
end if
if i mod 7=0 then
num7=num7+1
end if
next
最后num3就是能被3整除的数的个数.num7是能被7整除的个数.