VB编程求1到1000中能被3整除的数的个数在[1~1000]区间中的所有整数中,分别计算能被3整除的数的个数及能被7整除的数的个数,结果显示如题所示.要求:必须使用循环语句实现

来源:学生作业帮助网 编辑:作业帮 时间:2024/10/04 03:58:36
VB编程求1到1000中能被3整除的数的个数在[1~1000]区间中的所有整数中,分别计算能被3整除的数的个数及能被7整除的数的个数,结果显示如题所示.要求:必须使用循环语句实现
xQN@~Khzi9^LҔx2?)j"HeWp6q33#}|!=dl^@ĵi%k\i f} ;.=̣ꙤRn:")d"{dTYzIK[Y<ᖋkҝ^94h'%67Q{6C>qxoh"//mmT太,/h@thi' tEVb =t/@Tx`j0cԠJ ?6Ĝ6'έ8n =:'1޵4a\ ;6

VB编程求1到1000中能被3整除的数的个数在[1~1000]区间中的所有整数中,分别计算能被3整除的数的个数及能被7整除的数的个数,结果显示如题所示.要求:必须使用循环语句实现
VB编程求1到1000中能被3整除的数的个数
在[1~1000]区间中的所有整数中,分别计算能被3整除的数的个数及能被7整除的数的个数,结果显示如题所示.要求:必须使用循环语句实现

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整除的个数.