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)

代码顺序正确的是(     )

from microbit import *

while True:

    if button_a.is_pressed():

        display.show(Image.HAPPY)

    elif button_b.is_pressed():

        break

    else:

        display.show(Image.SAD)

sleep(1000)

在micro:bit硬件支持下，以下说法正确的是 （    ）

import random

a = [ 0 ] *5 ; i = 0 ; flag = True

while i < 5 :

    a[ i ] = random.randint( 1 , 8 )

    if i % 2 == 1 :

        a[ i ] = a[ i ] + a[ i - 1 ]

        flag = not flag

    elif a[ i ] % 2 == 0 and flag == False:

        i -= 1

 i += 1

执行该程序段后，列表a的值不可能的是（   ）

a=[1,3,5,7,9]

x=6

for i in range(3,1,-1):

 a[i+1]=a[i]

a[3]=x

#则程序执行后，a 的值为（   ）：

图 a

图 b

图 c

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