假定有如下程序: Private Sub.Form_Click() Dim a(4)As Integer,b(4)As Integer For k=0 To 2 a(k+1)=Val(InputBox(“请输入一个整数:”)) b(3一k)=a(k+1)

admin2020-04-18  26

问题 假定有如下程序:
Private Sub.Form_Click()
Dim a(4)As Integer,b(4)As Integer
For k=0 To 2
a(k+1)=Val(InputBox(“请输入一个整数:”))
b(3一k)=a(k+1)
Next k
Print b(k)
End Sub
运行程序,单击窗体,依次输入3、6、9,输出结果为

选项 A、3
B、6
C、9
D、1

答案A

解析 本题在循环中输入数据,当第一次输入3的时候a(1)=3,b(3)=a(1)=3;当第二次输入6的时候a(2)=6,b(2)=a(2)=6;当第三次输入9的时候a(3)=6,b(1)=a(3)=9,跳出循环后k的值为3,将输出b(3)的值。
转载请注明原文地址:https://jikaoti.com/ti/VPx0FFFM
0

最新回复(0)