当前位置: 高中信息技术 / 单选题
  • 1. (2020·杭州模拟) 有以下VB程序段

    Dim c(-10 To 10) As Integer, a(1 To 10) As Integer, b(1 To 10) As Integer

    a(1)=58:a(2)=88:a(3)=66:a(4)=60:a(5)=78

    a(6)=32:a(7)=54:a(8)=75:a(9)=99:a(10)=69

    Label1. Caption =

    For i=1 To 9

         b(i)=a(i+1)-a(i)

         c(b(i)\10)=c(b(i)\10)+1

    Next i

    For i=0 To 10

         If c(i) > 0 Then Label1.Caption = Label1.Caption + Str(c(i))

    Next i

    已知数组c各元素初值为0,执行该程序段,标签Label1上显示的内容是(    )

    A . 131 B . 1421 C . 1131 D . 11421

微信扫码预览、分享更方便