下列程序的输出结果为（）。 Private Sub Command1_Click（） Dim a ReDim a(6) For j=1 To 5 a(j)=jj Next j Print a(a(2)a(3)-a(4)2)+a(5) End Sub

精华吧→答案→知到智慧树→未分类

下列程序的输出结果为（）。 Private Sub Command1_Click（） Dim a ReDim a(6) For j=1 To 5 a(j)=jj Next j Print a(a(2)a(3)-a(4)2)+a(5) End Sub

A. 36

B. 25

C. 16

D. 41

正确答案：10 10

Tag：VisualBasic程序设计程序时间：2021-11-29 15:20:40

上一篇：有如下程序： Const n = -5 Const m = 6 Dim a(n To m) As Integer For i = LBound(a, 1) To UBound(a, 1) a(i) = i Next i Print a(LBound(a, 1)); a(UBound(a, 1))运行后输出的结果为（）。
下一篇：执行下面程序段后，输出的结果为（）。 Dim a(10, 10) As Integer For i = 2 To 4 For j = 4 To 5 a(i, j) = i * j Next j Next i Print a(2, 5) + a(3, 4) + a(4, 5)