200以内6的倍数有多少个（200以内6的倍数）

200÷6=33……2

因为是200以内的数，那么200以内6的倍数最大的那个数198

200以内6的倍数的数如下：

1*6，2*6，3*6……32*6，33*6

这些数一共有33个

这个问题可以直接从0到200做个循环，能被6整除的，就做加法，最后加在一起的数，就是要求的值： dim i as integer dim he as integer for i=0 to 200 if i mod 6=0 then he=he+i endif next 还可以利用数学知识，将这个过程简化一下，200以内，能被6整除的数的和，应该等于相同个数的从1加起的数的6倍，即，如果有n个能被6整除的数，那么这些数的和，应该与从1加到n的和乘以6相同，故，这个过程 还可以写作： he = 0 For i = 0 To 200 6 he = he + i Next he=he * 6 如果再利用等差数列求和公式，来写语句，就更简单了： he =(200 6)* ((200 6)*6+ 6) / 2