33、编写程序，计算200到300之间能被7整除但不能被17整除的所有整数的平均值Private Sub Form_Click()For a = 200 To 300If a Mod 7 = 0 And a Mod 170 Then s = s + a: n = n + 1Next aPrint s / nEnd Sub34、编写程序，求1*2*3*4*5*6的积。Private Sub Form_Click()s = 1For a = 1 To 6s = s * aNext aPrint sEnd Sub35、设n=15，编写程序，计算并输出S的值。
S=1+2^3+3...
