计算1~100以内能被3或5整除的数之和.以及显示其中能被3和5整除的数

计算1~100以内能被3或5整除的数之和.以及显示其中能被3和5整除的数
求这个VB的编码,特别是求和部分,急求
数学人气:578 ℃时间:2019-11-05 04:10:02
优质解答
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
我来回答
类似推荐
请使用1024x768 IE6.0或更高版本浏览器浏览本站点,以保证最佳阅读效果。本页提供作业小助手,一起搜作业以及作业好帮手最新版!
版权所有 CopyRight © 2012-2024 作业小助手 All Rights Reserved. 手机版