3.4递归法同步练习沪科版信息技术选修1

这是一份高中信息技术教科版 (2019)选修4 人工智能初步本册综合当堂检测题，共9页。试卷主要包含了选择题，填空题，操作题等内容，欢迎下载使用。
3.4递归法同步练习沪科版信息技术选修1学校:___________姓名：___________班级：___________考号：___________ 一、选择题1．某VB程序段如下：Function f (n As Integer) As Long   If n = 1 Thenf = 5Else  f= 2*f(n-1) – 3End IfEnd FunctionPrivate Sub Command1_click()  Dim n As Integer  n = Val (Text1.Text)  Text2. Text = Str(f(n))End Sub.该程序段运行后，在文本框Text1中输入5，单击命令按钮Command1后，文本框Text2中显示的是（  ）A．18 B．35 C．63 D．1232．有如下 VB 程序段：Dim n As IntegerDim sum As IntegerDim i As Integer Function fx(i As Integer) as Integer   If i = 1 Thenfx = 5  Else  fx = 5 * 2 ^ (i - 1) + fx(i - 1)   End   ifEnd Function Private Sub Command1_Click()   n = Val(Text1.Text): sum = 0   For i = 1 To n     sum = sum + fx(i)   Next i   Label1.Caption = Str(sum) End Sub 若在 Text1 中输入4，单击 Command1，则 Label1 中显示的内容为（   ）A．55 B．75 C．80 D．1303．有一个有趣的仓鼠繁殖问题：第一个月买来1对仓鼠，2个月后会生1对小仓鼠，以后每个月都会生1对小仓鼠；而生下来的仓鼠，也会从第二个月开始每月生1对小仓鼠，以此类推。试问一年后，仓鼠的总数达到多少？分析问题得出出生月份与仓鼠对数关系图程序中划线部分①②应填入的语句或表达式为（    ）A．①i=0 To 12  ②a(i-1)+a(i-2)B．①i=3 To 12  ②a(i-1)+a(i-2)C．①i=3 To 12  ②a(i+1)+a(i+2)D．①i=0 To 12  ②a(i+1)+a(i-2)4．用递归求n!，当n=1时，f(1)=1，否则f(n)=f(n-1)*n，当n=3时，递归调用顺序正确的是（   ）A．f(1)、f(2)、f(3)B．f(2)、f(3)、f(1)C．f(3)、f(2)、f(1)D．以上都不对5．有如下 VB 程序段：Function t(x As Integer) As Long    If x  = 1  Then t = 1    ElseIf x  = 2  Then        t = 2    Else        t = t(x - 1) + t(x - 2)    End IfEnd FunctionText1.Text = Str(t(8))执行该程序段后，文本框 Text1 中显示的内容是（   ）A．21 B．34 C．55 D．896．上台阶：每一步只能迈上1个或2个台阶，上完n级台阶，一共有多少种走法，下面说法正确的是（ ）A．用递归算法，递归关系式为f(n)=f(n-1)+2B．用递归算法，递归关系式为f(n)=f(n-1)+f(n-2)C．用递归算法，递归关系式为f(n)=f(n+1)+f(n+2)D．用递归算法，递归关系式为f(n)=f(n-1)*27．有如下 VB 程序段：Private Sub Command1_Click() Dim i As Integer,s As string s = "" For i = 1 To 3 Step 2  s = str(f(i)) + s Next i Text1. Text = sEnd SubFunction f(n As Integer) As Integer If n = 1 Then   f = 2 Else   f = f(n - 1) + n End IfEnd Function则执行该程序段后，s 的值为（    ）A．247 B．27 C．72 D．7428．【 加试题】王老师在使用 VB 程序要实现 n! 的功能。Private Sub Command1_Click()Dim p As IntegerDim sum As Long　p = Val(Text1.Text)　sum = fx(p)　Text2.Text = CStr(sum)End SubFunction fx(x As Integer) As Long　If x = 1 Then　　  fx = 1　Else　　  fx =____________________　End IfEnd Function要该程序实现此功能，横线处的代码为（　　）A．x(x)*(x-1) B．fx(x)*x C．fx(x-1)*x D．fx(x-1)*(x-1)9．有如下VB程序段：Private Sub Command1_Click()    Dim n As Integer， ans As Integer    n = 5    Dim x(1 To 5) As Integer    x(1) = -30: x(2) = 26: x(3) = -18: x(4) = 60: x(5) = 22    ans = 60    For i = 1 To n        If x(i) < 0 Then x(i) = -x(i)        ans = ans + gcd(ans， x(i))    Next i    Text1.Text = Str(ans)End SubFunction gcd(a As Integer， b As Integer)    If b = 0 Then        gcd = a    Else        gcd = gcd(b， a Mod b)    End IfEnd Function执行该程序段后，Text1. Text中显示的值为（    ）A．1 B．2 C．90 D．9810．某VB程序使用了递归函数，代码如下：Private Sub Command1_Click()n= val(Text1.Text)Text2.Text = f(n)End SubFunction f(x As Integer) As StringDim t as integerIf x = 1 Then  t = 1  Else  t = val(f(x - 1)) + 2f=str(t)End Function在文本框Text1中输入3，运行程序并点击按钮Command1后，文本框Text2中显示的内容是（    ）A．1 B．5 C．135 D．531 二、填空题11．递归的要素：________的递归的重要组成；________，它保证递归能在________的计算后得出结果，而不会产生________的情况。12．选择算法，解决问题。在使用计算机解决问题时，选择合适的算法，是有效解决问题的关键。分析下面的问题，请选择最合适的算法：__________(请用英文字母填写)A．解析法      B．递归法     C．穷举法     D．排序法搬砖问题：100块砖，100人搬，一个男人搬4块，一个女人搬3块，两个小儿抬1块，要求一次全搬完。请问需男、女、小儿各多少人?13．迭代算法与递归算法都需要________某些代码，两者既有区别又有密切的联系。迭代是重复________的活动，其目的通常是逼迫________，其结束方式，通常使用________结束循环。递归的重复方式是重复________，其结束方式是遇到________的情况时逐层返回。14．在数学与计算机领域中，递归函数是指用________定义该函数的方法。15．选择算法，解决问题。在使用计算机解决问题时，选择合适的算法，是有效解决问题的关键。分析下面的问题，请选择最合适的算法：_____________（请用英文字母填写）A．解析法      B．递归法      C．穷举法      D．排序法猴子吃桃问题：小猴有一天摘了若干个桃子，他非常贪吃，当天就吃掉了一半还多一个；第二天接着吃剩下的桃子一半多一个；以后每天都是如此，到了第七天吃桃子时，却发现只剩下一个。请问，小猴那天一共摘了几个桃子？ 三、操作题16．【加试题】货物搬运平地上有两叠货物需要搬运到别处，期中一叠有a个货物，另一叠有b个货物(0<a≤5,0<b≤5）。每次只能从其中一叠搬走位于最上方的货物。小明编写了一个VB程序，用于计算搬运货物的方案数。小明请教了数学老师，得知方案数运行界面如图所示：随后，小明编写了如下程序段：Private Sub calculate_Click()Dim a As IntegerDim b As IntegerDim c As Longa = Val(Text1.Text)b = Val(Text2.Text)c =fa(a, a + b)_____①______End SubFunction fa(m As Integer, n As Integer) As Long_____②_____End FunctionFunction jc(x As Integer) As LongIf x = 1 Thenjc = 1Elsejc = x * __ ___③__ ___End IfEnd Function（1）程序段Function jc部分主要采用了_______________算法；（2）在程序画线①处应填入________________________；在程序画线②处应填入________________________；在程序画线③处应填入________________________。
参考答案：1．B2．D3．B4．C5．B6．B7．C8．C9．D10．B11．     递推关系     边界条     有限     无限循环12．C13．     重复执行     反馈过程     所需目标或结果     计数器     调用函数自身     满足终止条件14．函数自身15．B16．     递归     Text3.Text=Str(c)     fa=jc(n)/(jc(m)*jc(n-m))     jc(x-1)