那么能得到任意三位数X个位数的表达式是： {#blank#}3{#/blank#}

请在程序的划线处填写合适的代码。

Private Sub Command1_Click()

        Dim a As String,s As String

        Dim r As Integer,x As Integer

        x = Val(Text1.Text)

        s = ""

        Do While x > 0

  ▲                 ‘①

            x = x \ 16

            If r > 9 Then

                a = Chr(r + 55)

            Else

                a = Str(r)

            End If

              ▲                 ‘②

Loop                     

        Text2.Text = s

        End Sub

⑴根据每试场安排的人数，判断输入的试场号是否在试场总数范围内，若是则转到⑵，否则重输试场号；

⑵根据考生次序和试场人数，计算每一考生所在试场号存入数组sc；

⑶计算考生在本试场中的次序，再根据试场安排的排数，计算考生座位所在的组数和排数，分别存人数组z和数组P。座位分布为“S”形，奇数组和偶数组座位排列顺序不同。

根据以上算法编写VB程序，在文本框Text1中输入组数，在文本框Text2中输入排数，在文本框Text3中输入试场号，单击“查询”按钮Command1，在List1中显示该试场座位表(名字前的数字是考生在名单中的次序)，运行界面如图2所示。

lst = [2,5,2,1]

y = [1,1,1,1]

n = len(lst)

for i in range(①____):

    for j in range(②____):

        if ③____:

            y[j] = y[j] + 1

        else

            y[i] = y[i] + 1

上述程序段3个划线处的表达式分别为（   ）