[填空题] 执行下面程序，第一行输出结果是 【14】 ，第二行输出结果是47。
Option Explicit
Private Sub Form_Click( )
Dim A As Integer
A=2
Call Sub1 (A)
End Sub
Private Sub1 (x As Integer)
x=x*2+1
If x＜10 Then
Call Sub1 (x)
End If
x=x*2+1
Print x
End Sub
[填空题] 执行下面程序，第一行输出结果是 【14】 ，第二行输出结果是47。
Option Explicit
Private Sub Form_Click( )
Dim A As Integer
A=2
Call Sub1 (A)
End Sub
Private Sub1 (x As Integer)
x=x*2+1
If x＜10 Then
Call Sub1 (x)
End If
x=x*2+1
Print x
End Sub
W
[命题目的] 考查考生对过程调用的应用情况。[解题要点] 递归是一种十分有用的程序设计技术。递归过程是在过程定义中调用(或间接调用)本过程的过程。递归过程的关键部分就是要子过程函数 Sub1()被调用了多少次。当x=2时调用了第1次，当 x=5时调用了第2次，当x=11时不再调用，退出之前分别按x=23和x=47输出。[考点链接] 通用过程的调用和通用过程中的参数调用。
VIP截止日期：2025-01-02 01:52:48
←请使用支付宝扫码支付
VIP截止日期：2025-01-02 01:52:48
←请使用微信扫码支付
