[填空題] 執(zhí)行下面程序，第一行輸出結(jié)果是 ，第二行輸出結(jié)果是 。
Option Explicit
Private Sub Form_Click()
Dim A As Integer
　　A=2
　　Call Subl(A)
　　End Sub
Private Subl(x As Integer)
　　x=x*2+1
　　If x＜10 Then
　　　　Call Subl(x)
　　End If
　　x=x*2+1
　　Print x
End Sub

47

遞歸是一種十分有用的程序設(shè)計技術(shù)。遞歸過程是在過程定義中調(diào)用(或間接調(diào)用)本過程的過程。遞歸過程的關(guān)鍵部分就是要子過程函數(shù)Sub1()被調(diào)用了多少次。當(dāng)x=2時調(diào)用了第一次，當(dāng)x=5時調(diào)用了第二次，當(dāng)x=11時不再調(diào)用，退出之前分別按x=23和x=47輸出。