max=10 000

    For i=1 To 10

        s=0

        For j=i To 10

          s=s+a(j)

          If s>max Then max=s

        Next j

Next i

已知数组a(1)到a(10)的原始数据为6，-6，8，-7，7，2，-2，-1，-2，4。程序执行后，变量max的值为（  ）

a = 1

b = 0

m = a

x = m + b

b = b + 1

y = x + b

它的基本结构属于（   ）

Const n = 8

Dim a(1 To n) As Integer

For i = 1 To n

    a(i) = Int(Rnd * 20)

Next i

x = n \ 2

For i = x To 2 Step -1

    For j = 1 To i - 1

      If a(j) < a(i) Then

        t = a(j): a(j) = a(i): a(i) = t

      End If

    Next j

Next i

i = n

Do While i > x + 1

    k = i

    For j = i - 1 To x + 1 Step -1

      If a(j) > a(k) Then k = j

    Next j

    If k <> i Then

      t = a(k): a(k) = a(i): a(i) = t

    End If

    i = i - 1

Loop

执行完这段代码后，数组 a 中各个元素的值可能的是（  ）