• 2022-05-30 问题

    下列语句中,正确的是______。 A: Dim a As Varianta = Array(1,2,3,4,5) B: Dim a(10) As Integera = Array(1,2,3,4,5) C: Dim a%(10)a(1) = "ABCDE" D: Dim a(3),b(3) As Integera(0) = 0b = a

    下列语句中,正确的是______。 A: Dim a As Varianta = Array(1,2,3,4,5) B: Dim a(10) As Integera = Array(1,2,3,4,5) C: Dim a%(10)a(1) = "ABCDE" D: Dim a(3),b(3) As Integera(0) = 0b = a

  • 2021-04-14 问题

    执行以下程序,MsgBox输出的值是________。Dim i, a(9) As Integera(0) = 1a(1) = 1For i = 2 To UBound(a)a(i) = a(i - 1) + a(i - 2)Next iMsgBox(a(9))

    执行以下程序,MsgBox输出的值是________。Dim i, a(9) As Integera(0) = 1a(1) = 1For i = 2 To UBound(a)a(i) = a(i - 1) + a(i - 2)Next iMsgBox(a(9))

  • 2022-06-06 问题

    下面程序的输出为()。INTEGERA(10)DATAA/1,2,3,4,5,6,7,8,9,10/DO10K=1,10M=A(K)+1A(K)=A(10-K+1)+1A(10-K+1)=M10CONTINUEWRITE(*,*)A(5)END A: 5 B: 6 C: 7 D: 8

    下面程序的输出为()。INTEGERA(10)DATAA/1,2,3,4,5,6,7,8,9,10/DO10K=1,10M=A(K)+1A(K)=A(10-K+1)+1A(10-K+1)=M10CONTINUEWRITE(*,*)A(5)END A: 5 B: 6 C: 7 D: 8

  • 1