问题
填空题
执行下面程序，第一行输出结果是 ，第二行输出结果是 。
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
解析： 递归是一种十分有用的程序设计技术。递归过程是在过程定义中调用(或间接调用)本过程的过程。递归过程的关键部分就是要子过程函数Sub1()被调用了多少次。当x=2时调用了第一次，当x=5时调用了第二次，当x=11时不再调用，退出之前分别按x=23和x=47输出。