(37)设有以下程序: Private Sub Form_Click() x=50 For i=l To 4 Y=InputBox(“请输入一个整数”) Y=Val

admin2013-11-29  22

问题 (37)设有以下程序:
    Private Sub Form_Click()
         x=50
         For i=l To 4
            Y=InputBox(“请输入一个整数”)
            Y=Val(Y)
            If Y Mod 5=0 Then
                a=a+Y
                 X=Y
            Else
                 a=a+X
            End If
      Next i
       Print a
    End Sub
    程序运行后,单击窗体,在输入对话框中依次输入15、24、35、46,输出结果为(     )。

选项 A、100
B、50
C、120
D、70

答案A

解析 程序的作用是输入的数如果是5的倍数就累加,如果不是就每次加50或与上次是5的倍数的那个数相累加。因此最终a的值是15+15+35+35=100。
转载请注明原文地址:https://jikaoti.com/ti/3B60FFFM
0

最新回复(0)