试题 试卷
题型:单选题 题类:常考题 难易度:普通
浙江省台州中学2016-2017学年高一下学期信息技术第四次统练试题
Private Sub Command1_Click()
Dim i As Integer, c As Integer, n As Integer
c = 0: n = 10
For i = 1 To 10 Step 2
If n Mod i = 0 Then
c = c * i
Else
c = c + i
End If
Next i
Text1.Text = Str(c)
End Sub
Private Sub Form_Load()
x=1
For i=1 To 5
x=x*i
S=0
For i=1 To 3
s=s+2
Print s
执行该算法,依次输入a的值为3,5,2后,算法的输出结果为( )
试题篮