Dim d(0 To 9) As Integer

s=Text1.Text

c=0

For i=0 To 9

    d(i)=0

Next i

For i=1 To Len(s)

          '填空

Next i

Text2.Text=Str(c)

方框处的代码可由以下三部分组成：

①d(t)=i   ②t=val(Mid(s，i，1))   ③if d(t)<>0 And i-d(t)>c Then c=i-d(t)

代码顺序正确的是(     )

i=0

while i<6:

   print

   i=i+1

Dim a(l To n) As Integer,y(l To n) As Integer, i As Integer, j As Integer

k=Val(Text1.Text)

For i=1 To n

    y(i)=1

Next i

For i=1 To n

    For j=1 To n

        If a(i) < a(j) Then y(i)=y(i)+1

    Next j

    If y(i)=k Then List1.AddItem Str(a(i))

Next i

数组 a 的各元素的值为3，4，3，1，4，4，5，5，6，2，0， 在文本框中输入4，执行该段程序后 List1 中显示的值为（    ）

for n in range( 100,1000)：

    i=n//100

    j=n//10%10

    k=n%10

if n=               ：

    print(n)

import random

q=[0]*8 ; head,tail=0,4

for i in range(4):

    k=random.randint(0,10)

    if k%2==0:

        q[tail]=k%5

        tail+=1

    else:

        head+=1

while head<tail:

    print(q[head],end=" ")

    head+=1

程序运行后，输出结果可能为（   ）

图 a

图 b

图 c

编写程序：对给定的标准答案，生成并输出每道题的填涂信息，对应的选项、分值（答对得2分，答错或不答得0分），以及最后的总得分，输出结果如图c所示。请回答下列问题：