编写如下程序代码: Prirate Sub Command1_Click() Dim t(10)As Integer Dim k As Integer,x As Integer For k=10 To 2 Step-1

admin2019-06-20  41

问题 编写如下程序代码:
    Prirate Sub Command1_Click()
    Dim t(10)As Integer
    Dim k As Integer,x As Integer
    For k=10 To 2 Step-1
    t(k)=11—k
    Next
    x=5
    Print t(2+t(x))
    End Sub
    程序运行后,单击命令按钮Command1,输出结果为(    )。

选项 A、4
B、3
C、5
D、6

答案B

解析 程序开始时声明一个一维数组t,整型变量k和x。然后利用For循环给数组t赋值,For循环中循环变量k的初始值为10,终止值为2,步长step为一1。k=10,t(10)=11—10=1;k=9,t(9)=11一9=2;k=8,t(8)=11一8=3;k=7,t(7)=11—7=4;k=6,t(6)=11一6=5;k=5,t(5)=11—5=6:k=4,t(4)=11一4=7:k=3,t(3)=11一3=8;k=2,t(2)=11一2=9;x=5,t(5)=6,t(2+t(5))=t(8)=3,故最终输出表达式的结果为3,B选项正确。本题选择B选项。
转载请注明原文地址:https://jikaoti.com/ti/DhN0FFFM
0

最新回复(0)