汽车贷款不还后果怎样:有那位朋友能帮帮忙?解决一下这个问题啊

来源:百度文库 编辑:高校问答 时间:2024/04/26 21:20:31
这道编程题该如何解答?谢谢!非常感谢
输出1~100的自然数中能被3整除的数的个数并求出他们的和
要求用VB解答

dim i as integer
dim j as integer
dim sum as integer
sum=0
j=0
for i=1 to 100
if (i mod 3=0) then
j=j+1
sum=sum+i
next
print "能被3整除的个数为" & j
print "总和为" & sum