试题

试题 试卷

logo

题型:单选题 题类:模拟题 难易度:普通

浙江省2018届高三下学期教育绿色评价联盟选考信息技术适应性考试

【加试题】有如下VB程序段:

  Dim a(1 To 1 000)As String

  Dim b(1 To 2)As Integer

  N=Len(Text1.Text)

  For i=1 To n

    a(i)=Mid(Text1.Text,i,1)

  Next i

  DO While n>l

    If ASC(a(n))>=Asc(a(n-1))Then

       m=1

    Else

      m=2

    End If

    b(m)=b(m)+1

    n=n-1

  Loop

数组b各元素的初始值都为0,文本框Text1的内容为“2018Python”。执行程序后,变量b(1)的值为(  )

A、10 B、6 C、5 D、4
举一反三
返回首页

试题篮