若采用冒泡排序算法对这组数据进行升序排列，那么在完成第一遍排序时，数组元素a(1)到a(6)的数据依次是（   ）

实现上述功能的VB代码如下：

请在划线处填入合适代码。

Private Sub Command1Click()

    Dim a As Integer, b As Integer

    Dim n As Integer, t As Integer

    Dim m(1 To 100) As Integer

    a = Val(Text1.Text)

    b = Val(Text2.Text)

    n = Val(Text3.Text)

    If  a > b Then t = a: a = b: b = t

    Randomize

         ①        

    For i = 2 To n

    m(i) = Int(Rnd * (b - a + 1)) + a

    If m(i) > m(i - 1) Then

           ②     

    For j = i - 1 To 1 Step -1

    If temp < m(j) Then Exit For

    m(j + 1) = m(j)

    Next j

          ③     

    End If

    Next i

    For i = 1 To n

    List1.AddItem Str(m(i))

    Next i

End Sub

程序①处的代码是{#blank#}1{#/blank#}

程序②处的代码是{#blank#}2{#/blank#}

程序③处的代码是{#blank#}3{#/blank#}

实现上述功能的VB程序如下，但加框处代码有错，请改正。

Const n = 10

Const maxn = 20

Dim a(1 To n) As Integer, index(1 To n) As Integer, flag(1 To n) As Boolean

Private Sub Form_Load()

Dim i As Integer

Randomize

For i = 1 To n

 flag(i) = False

 a(i) = Int(Rnd() * maxn) + 1

 List1.AddItem Str(a(i))

Next i

End Sub

Private Sub Command1_Click()

Dim i As Integer, j As Integer

Dim k As Integer

For i = 1 To n

 For j = 1 To n

  If flag(j) = False Then k = j: Exit For

 Next j

 For m = k + 1 To n

  If Then k = m     ‘⑴

 Next m

 index(i) = k

 flag(k) = True

Next i

For i = 1 To n

 List2.AddItem      ‘⑵

Next i

End sub

⑴{#blank#}1{#/blank#} ⑵{#blank#}2{#/blank#} 

n = Val(Text1.Text)

For i = 1 to n

 a(i) = i

Next i

For i = 1 to n/2-1

 For j = n to 2*(i+1) step -2

  If      ①    Then t = a(j):a(j)=a(j-2):a(j-2)=t

 Next j

For j = 1 to n- i*2 step 2

  If      ②    Then t = a(j):a(j)=a(j+2):a(j+2)=t

 Next j

Next i

图a

import pandas as pd

df = pd.read_excel("ddsl.xlsx") #读文件中的数据

df= df.drop(["日期"，"订单号"，"单价"，"金额"]，axis=1) #删除列

dfg = df.groupby("    ①    "，as_index= False).sum() #分组求和

dfs =    ②

plt.bar(dfs["菜品"], dfs["份数"])  #绘制柱形图

#设置图表样式，显示图表代码略