2019年高考信息技术复习（江浙选考1）配套精品（课件+优选试题）：算法与程序设计 第一章 过程和函数 (共2份打包)

第三部分 算法与程序设计 条目梳理 随堂演练 第一章　过程和函数 条目梳理 随堂演练 -3- 条目梳理 随堂演练 -4- 考点1 考点2 考点3 过程和自定义函数 VB应用程序是按模块化的方式组成的,程序模块分为过程和函数两种。 (1)过程中的代码可以被重复调用,但不返回值。事件处理过程定义格式为: Sub 对象名_标准事件名(参数表) 语句块 End Sub (2)函数是类似于过程的另一种程序模块,不同之处是函数执行完成后,可以返回处理结果,供程序的后续部分继续处理。 自定义函数定义格式: Function 函数名(参数表) As　类型名 语句块 End Function 条目梳理 条目梳理 随堂演练 -5- 考点1 考点2 考点3 【例1】 著名的哥德巴赫猜想是任一大于2的偶数都可写成两个质数之和。现用程序验证:程序运行时在文本框Text1输入一个偶数n,单击验证按钮后在列表框List1上显示验证结果。请完善下列程序代码: 条目梳理 条目梳理 随堂演练 -6- 考点1 考点2 考点3 Function prime(x As Integer) As Boolean　'判断x是否为素数 prime=True For i=2 To Int(Sqr(x)) If 　①　 Then prime=False:　Exit For  Next i End Function Private Sub Command1_Click() Dim a As Integer,b As Integer,n As Integer List1.Clear 　②　  For a=2 To n\2 b=n-a 条目梳理 条目梳理 随堂演练 -7- 考点1 考点2 考点3 If 　③　 Then  　　List1.AddItem (Str(a)+″+″+Str(b)+″=″+Str(n)) End If Next a End Sub 答案:①x Mod i=0　②n=Val(Text1.Text) ③prime(a) And prime(b) 解析:如果x被[2, ]中的任何一个数整除,那么就不是素数,也就无需再判断后面的数,所以①空的答案为x Mod i=0。而a,b两个数都必须是素数,故③空的答案是prime(a) And prime(b)或者prime(a)=True And prime(b)=True。 条目梳理 条目梳理 随堂演练 -8- 考点1 考点2 考点3 递归算法 在一个子程序(过程或函数)的定义中直接或间接地调用该子程序本身(即自己调用自己)的算法,称为递归算法。 条目梳理 条目梳理 随堂演练 -9- 考点1 考点2 考点3 【例2】 以下自定义函数用以计算n的阶乘n!,即计算前n个自然数的乘积: Function　f(n As Integer) As Integer 　If　n = 1　Then 　　f= 1 　Else 　 f = n*f(n-1) 　End If End Function 该自定义函数采用的算法是(　　) A.枚举算法 B.解析算法 C.递归算法 D.查找算法 条目梳理 条目梳理 随堂演练 -10- 考点1 考点2 考点3 答案:C 解析:程序中f是自定义函数,函数内部语句“f = n*f(n-1)”调用函数自身,因此该自定义函数采用的算法是递归算法。 条目梳理 条目梳理 随堂演练 -11- 考点1 考点2 考点3 【例3】 用递归算法求 1~n 个连续自然数的和的VB程序段代码如下。 Function sum (n A Integer)A Integer '求 1~n 个连续自然数的和 If n = 1 Then sum = 1 Else sum =　　　　　　　　　　　　　　  　End If 条目梳理 条目梳理 随堂演练 -12- 考点1 考点2 考点3 End Function Private Sub Command1_Click() n=text1.text text2.text=str(sum(n)) End Sub 划线处应填入的语句是(　　) A.n+sum(n-1) B.sum(n-1) C.n+sum(n) D.sum+n 答案:A 解析:n个自然数的和=n+前n-1项数字的和,递归的算法即为n+sum(n-1)。 条目梳理 条目梳理 随堂演练 -13- 考点1 考点2 考点3 VB访问Access数据库 ADO(Activex Data Objiects)是微软公司提供的一种应用程序访问数据库的编程接口。该接口包含了多个对象,其中Connection对象用于与数据库的连接,在建立连接后,可以通过Recordset对象获取数据表中数据。ADO访问Access数据库的基本过程是: (1)通