Dim m, n, k As Integer

m = 6

n = 1

For k = 1 To m Step 2

    n = n * k

Next k

Print "n ="; n

程序运行后，n的值是：

小红所在学校共有30个班级，学校经常需要统计各班参与安全教育平台的学生数。小红编程实现：输入各班学生人数，电脑计算并输出总人数。实现上述功能的Python程序如下，请在①划线处填入合适的代码，在②划线处选填答案。

s= ①  #累加器s初始化

for i in range(1,31):

        x=int(input(“输入各班参与安全平台的学生数“))   

   ②   

print(“安全平台学习总人数：”,s)

②划线处，可选填（单选，填字母）

A．s=s+x    B．s=s+1    C．x=x+s    D．x=x+1

 用VB程序实现水仙花数，如果一个三位数等于它的每个数字的立方的和，则此数称为“水仙花数”，如153=1³+5³+3³  ， 故153是水仙花数。求100~999之间的全部水仙花数

Private Sub Command1_Click()

    Dim i, j, m, n As Integer

    For

        i =            ´求百位上的数字

        j = (n Mod 100) \ 10     ´求十位上的数字

        m = n Mod 10             ´求个位上的数字

        If Then

            Print n; "="; i; "^3+"; j; "^3+"; m; "^3"

        End If

    Next n

End Sub