[填空题] 执行下面程序,第一行输出结果是 (11) ,第二行输出结果是 (12) 。 Option Explicit Private Sub Form_Click() Dim A As Intege

19 查阅

[填空题] 执行下面程序,第一行输出结果是 (11) ,第二行输出结果是 (12)
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输出。

计算机考试