vb编程:求在[1~1000]区间中的所有整数中能被3整除的数的个数及能被7整除的数的个数,用循环语句;
来源:学生作业帮 编辑:搜搜做题作业网作业帮 分类:综合作业 时间:2024/07/06 15:15:03
vb编程:求在[1~1000]区间中的所有整数中能被3整除的数的个数及能被7整除的数的个数,用循环语句;
![vb编程:求在[1~1000]区间中的所有整数中能被3整除的数的个数及能被7整除的数的个数,用循环语句;](/uploads/image/z/351647-71-7.jpg?t=vb%E7%BC%96%E7%A8%8B%EF%BC%9A%E6%B1%82%E5%9C%A8%5B1%7E1000%5D%E5%8C%BA%E9%97%B4%E4%B8%AD%E7%9A%84%E6%89%80%E6%9C%89%E6%95%B4%E6%95%B0%E4%B8%AD%E8%83%BD%E8%A2%AB3%E6%95%B4%E9%99%A4%E7%9A%84%E6%95%B0%E7%9A%84%E4%B8%AA%E6%95%B0%E5%8F%8A%E8%83%BD%E8%A2%AB7%E6%95%B4%E9%99%A4%E7%9A%84%E6%95%B0%E7%9A%84%E4%B8%AA%E6%95%B0%2C%E7%94%A8%E5%BE%AA%E7%8E%AF%E8%AF%AD%E5%8F%A5%EF%BC%9B)
private sub command1_click()
dim i,a,b
for i=1 to 1000
if i mod 3=0 then a=a+1
if i mod 7=0 then b=b+1
next
print "1~1000中能被3整除的数的个数=" & a
print "1~1000中能被7整除的数的个数=" & b
end su
dim i,a,b
for i=1 to 1000
if i mod 3=0 then a=a+1
if i mod 7=0 then b=b+1
next
print "1~1000中能被3整除的数的个数=" & a
print "1~1000中能被7整除的数的个数=" & b
end su
vb编程:求在[1~1000]区间中的所有整数中能被3整除的数的个数及能被7整除的数的个数,用循环语句;
vb编程:求1000以内所有能被7整除的数的个数
VB编程求1到1000中能被3整除的数的个数
统计[1,1000]能被3或7整除所有数的个数.(for语句)
VB编程求1——500之中能被3整除但不能被5整除的数的个数以及这些数累加的和.
VB编程 随机产生50个10~200的整数,统计能被5整除的数的个数
用for循环语句编程,写出,0到100之间能被3整除的个数
按要求编写SQL语句:计算1-100之间所有能被3整除的数的个数及总和
C语言编程题 1:求100-300之间所有数个数,及偶数的个数.2:求70以内能被8整除的.3:求10个数中最大数.
VB编程数据文件里的前10000个数从小到大排列,前5000个数中能被3整除的数的个数
求10,1000内所有能被5,7,9中至少一个数整除的整数的个数
用VB如何写1到100之间所有能被3整除而不能被7整除的整数的和与个数的程序