2. 计算机
  3. 设有以下程序： Private Sub Form Click() x=50 For i=1 To 4 y=InputBox(“请输入一个整数”) y=Val(y) IfY Mod 5=0 Then a=a+y x=y Else a=a+x End If N

设有以下程序： Private Sub Form Click() x=50 For i=1 To 4 y=InputBox(“请输入一个整数”) y=Val(y) IfY Mod 5=0 Then a=a+y x=y Else a=a+x End If N

admin2020-04-18  34
问题 设有以下程序：
Private Sub Form Click()
x=50
For i=1 To 4
y=InputBox(“请输入一个整数”)
y=Val(y)
IfY 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
解析 本题考查的考点是有关循环的。本题需要写出每一次循环的变量变化情况。第一次循环时输入15，If判断为真，所以a=15，x=15；第二次循环时输入24，If判断为假，所以a=15+15=30：x仍然为15；第三次循环时输入35，If判断为真，所以a=30+35=65，x=35；第四次循环时输入46，If判断为假，所以a=65+35=100，x=35。
转载请注明原文地址:https://jikaoti.com/ti/FUx0FFFM
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)