长度小于等于 100），在列表框 List1 里输出所有配对括号在表达式中的位置。例如在文本框 Text1 里入：“12*(3-(1+2))*3”，程序运行效果如图所示。

实现上述功能的 VB 代码如下，在划线的地方填入合适代码，完善程序。Private Sub Command1_Click()

Dim s As String

Dim a(1 To 100) As Integer

i = 1 top = 0

Do While i <= Len(s)

     If Mid(s, i, 1) = "(" Then

        top = top + 1

        {#blank#}1{#/blank#} 

     End If

     If Mid(s, i, 1) = ")" Then

        List1.AddItem Str(a(top)) + "    " + Str(i)

        {#blank#}2{#/blank#} 

     End If

     i=i+1 Loop

End Sub

y=0

n=Len(Text 1．Text)

For i=1To n

    c=Mid(Text 1.Text，i，1)

    If c>=“0”And c<=“9”Then

        x=Val(c) ：a(x) =a(x) + 1

    End If

Next i

For i= 0 To 9

    If a(i) >0Then y=y+ 1

Next i

Label 1．Caption=Str(y)

a数组各元素的初值为0，程序运行时，在文本框Text 1中输入内容“pi=3．1415926535”，单击按钮Command 1后，标签Label 1中显示的内容是（  ）

def f(k):

    if k<=3:

        print(k)

        return

    for i in range(1,4):

        f(k-i)

    return

执行语句f(6)，则f(3)被调用的次数为（   ）