Dim I As Integer '循环引用变量 Dim Sum3 As Integer '存储3的倍数的和 Dim Sum7 As Integer '存储7的倍数的和 For I = 1 To 100 '求3的倍数的和 If I Mod 3 = 0 Then Sum3 = Sum3 + I End If '求7的倍数的和 If I Mod 7 = 0 Then Sum7 = Sum7 + I End If Next I '打印结果 Print Sum3, Sum7 我的回答应该是你想要的答案吧？
内容全部来源于网络收集，如有侵权，请联系网站删除：QQ：24596024