计算1~100以内能被3或5整除的数之和.以及显示其中能被3和5整除的数
题目
计算1~100以内能被3或5整除的数之和.以及显示其中能被3和5整除的数
求这个VB的编码,特别是求和部分,急求
答案
Sub a()i = 1j = 1s = 0For i = 1 To 100 Step 1If i Mod 3 = 0 Or i Mod 5 = 0 ThenCells(j + 1,1) = is = s + ij = j + 1End IfNext iCells(1,1) = "1~100以内能被3或5整除的数之和等于" & sEnd Sub
举一反三
已知函数f（x）=x，g（x）=alnx，a∈R．若曲线y=f（x）与曲线y=g（x）相交，且在交点处有相同的切线，求a的值和该切线方程．
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
热门考点