当前位置:IT认证>BASIC题库

问题:[填空题]

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

微信端