算法和程序设计知识点(20210128072959)

1、选修 1：算法与程序设计 第一单元 算法 一、 知识内容 （一） 使用计算机解决问题的一般过程 考试要求：对所列知识要知道 其内容及含义，并能用自己的语言或动作进行表达、判断和直 接运用。 1一般过程 （1）分析问题确定要使用计算机来 “做 什么 ”，即确定解题的任务。 （2）寻求解决问题的途径和方法。 （3）用计算机进行处理。 2确定解决问题的方法及步骤化 确 定了解决问题的方法后，必须把解决问题的方法步骤化，即用 某种方式告诉计算机每个需做什么。 计算机开始计算之前，需 把解决问题的程序存储在内存中。 通常一个程序包括指令和数 据两部分。 （1）指令部分：指令是对计算机操作类型和操作 数地

2、址做出规定的一组符号。（ 2）数据部分：计算所需的原始数据、计算的中间结果或最终结果。3设计程序时需要考虑的问题 （ 1）数据的存储：计算所需要的原始数据、计算产 生的中间结果需要存储在不同的变量中。（ 2）计算的过程：把解决问题的方法步骤化，并用计算机能执行的指令来有序地 实现对应的步骤。 （3） 典型的指令类型有输入指令、输出指 令、算术运算指令、逻辑运算指令和控制转移指令。 （二）算 法及算法的表示方法 考试要求：对所列知识要理解其确切含义 及与其它知识的联系，能够用所学的信息技术知识和操作方法 解决实际问题，熟练应用信息技术进行信息的处理。 1算法 的特征 （ 1）有穷性。一个算法必须

3、保证它的执行步骤是有限 的， 即它是能终止的。 （ 2）确定性。算法中的每个步骤必须有确切的含义，不应当有模棱两可的。（3） 能行性。算法中的每一个步骤都要足够简单，能实际能作的，而且在能在有限 的时间内完成。 （4）有 0 个或多个输入。 （5）有一个或多个 输出。 （三） 用自然语言、流程图、伪代码表示算法 考试要求： 对所列知识要理解其确切含义及与其它知识的联系，能够用所 学的信息技术知识和操作方法解决实际问题，熟练应用信息技 术进行信息的处理。 1自然语言 就像写文章时所列的提纲 一样，可以有序地用简洁的自然语言加数学符号来描述算法。 2流程图 用国家颁布的标准（ GB1526-89，

4、 ISO5807-1985） 中规定的图示及方法来画流程图，常用的构件有如图所示。3伪代码 使用某些程序设计语言中控制 结构，来描述算法中各步骤地执行次序和模 式；使用自然语言、数学符号或其他符号， 来表示计算步骤要完成的处理或需要涉及的 数据。 （四）顺序、选择和循环三种基本模 式 考试要求：对所列知识要理解其确切含义 及与其它知识的联系，能够用所学的信息技 术知识和操作方法解决实际问题，熟练应用 信息技术进行信息的处理。 1顺序模式就是 按指令的先后顺序依次执行 2分支模式就是 根据分支条件，判断条件成立情况，选择某 一条路径中的指令执行 3循环模式就是首先判断条件是否成立，如果不成立则直

5、接执行 循环体外的第一条指令，如果条件成立则执 行循环体内的指令，然后再次判断条件是否 成立，如果条件成立再次执行循环体内的指 令，直至条件不成立跳出循环体为止。 三种 基本模式流程示意图如下图所示。二、例题分析 1下面关于算法的描述，正确的是 (A) 一个算法只能有一个输入 (B) 算法只能 用框图来表示 (C) 一个算法的执行步骤可以 是无限的 (D) 一个完整的算法，不管用什么 方法来表示，都至少有一个输出结果 参考答 案：D 所考知识点：算法的特征 2.算法描 述可以有多种表达方法，下面哪些方法不可 以描述“闰年问题”的算法(A)自然语言(B)流程图(C)伪代码(D)机器语言 参考答

6、案：D所考知识点：算法的描述 3 .算法与程序的关系(A)算法是对程序的描述(B) 算法决定程序，是程序设计的核心(C) 算法与程序之间无关系 (D) 程序决定算法，是算法设计的 核心参考答案： B 所考知识点：算法的概念 4.人们利用计算 机解决问题的基本过程一般有如下四个步骤( )，请按 各步骤的先后顺序在下列选项中选择正确的答案 调试程序分析问题设计算法编写程序 (A) (B) (C) (D) 参考答案： B 所 考知识点：用计算机解决问题的过程5在一次电视选秀活动中，有三个评位为每位选手打分。如果三个评委都亮绿灯，则 进入下一轮；如果两个评委亮绿灯，则进入待定席；如果红灯 数超过二盏则

7、淘汰。最适合用到的程序结构是(A)循环(B)赋值 (C) 分支 (D) 顺序参考答案： C 所考知识点：算法的基本模 式 6下列流程图符号属于判断框的是(A) (B) (C) (D) 参考答案： D 所考知识点：算法的表示、流程图第二单元VB程序设计一、知识内容(一)面向对象程序设计的基本思想与方法 考试要求：对所列知识要知道其内容及含 义，并能用自己的语言或动作进行表达、判断和直接运用。1. 面向对象程序设计(object oriented programming,缩写OOP)方法：在进行程序设计是从分析问题领域中各种客观事 物本体的属性和行为，以及它们之间的相互关系着手，在计算 机中建立起

8、这些客体的映象 对象,用对象对应于问题领域 中的客体,用对象间的消息传递来表示客体的相互作用、相互 关系。(二)属性、类、事件和事件处理的概念 考试要求：对 所列知识要知道其内容及含义,并能用自己的语言或动作进行 表达、判断和直接运用。 1.对象是客观存在的事物或概念。 它有两个特点：状态和行为。 2.一个对象的状态是通过若干 个属性( property )来描述的；行为是指对属性进行操作和处理 的方法(method)。在面向对象的程序设计中，一个对象是由一组对象状态的数据和一组描述处理对象属性的方法的代码构 成的。对象的属性定义其外观，方法定义其行为，事件定义其 与用户的交互。3.类（cla

9、ss）是对相同性质的对象的一种抽象， 而一个对象则是类的一个实例” 4.事件（event）就是发生在对象上的事情，通常是由用户在对象上激发的一种动作。一 个事件的发生，可以引起某个对象上某个方法（事件处理过程） 的执行，即由某个事件驱动了相应的事件处理过程的执行。这 就是面向对象程序设计中的事件驱动概念。（二） VB 应用程序的界面设计与调式 考试要求：对所列知识要理解其确切含义 及与其它知识的联系，能够用所学的信息技术知识和操作方法 解决实际问题，熟练应用信息技术进行信息的处理。1. VB 应用程序的界面设计（1） VB程序设计语言：基于 Basic语言的可视化程序设计环境，采用面向对象的程

10、序设计方法（OOP）。（ 2） VB 应用程序设计环境的的窗口主要由对象窗口、控件工 具箱、属性窗口、工程窗口组成。 （ 3）控件工具箱集中了常 用 的 基 本 控 件 ： 标 签 label、 文 本 框 TextBox、 命 令 按 钮 Command Button、列表框 ListBox等。（4）窗体（Form）是 VB 应用程序的基本结构。窗体可以看作是一个“容器 ”，其中放置着各种各样在应用程序中必须用到的对象。2. VB 应用程序的运行和保存 运行：单击工具栏中 “运行 ”选项中的启动按钮，运 行应用程序。 保存：在 “文件 ”菜单中选 “工程另存为 ”，该应用 程序的窗体和工程分

11、别存储到文件中，其相应的文件扩展名分 别是“.frm和“.vbp ”。也可以选 文件”菜单中的 生成工程 xxx.exe ，”这样，就可在 Windows 环境中直接运行这个应用程 序了。 （四）事件处理代码的编制方法考试要求：对所列知识 要理解其确切含义及与其它知识的联系，能够用所学的信息技 术知识和操作方法解决实际问题，熟练应用信息技术进行信息 的处理。 对于对象而言，事件就是发生在该对象上的事情，通 常是由用户在对象上激发的一种动作。一个事件的发生，可以 引起某个对象上某个方法的执行，即由某个事件驱动了相应的 事件处理过程的行为。 在事件处理过程中，可以按预定设计好 的方式，改变某个对象

12、的相关属性值，因此是这个对象的状态 得到相应的改变。 （五）VB基本数据类型、常量、变量和数 组考试要求：对所列知识要理解其确切含义及与其它知识的联 系，能够用所学的信息技术知识和操作方法解决实际问题，熟 练应用信息技术进行信息的处理。1数据：数据是信息的一种记录形式。在 VB 中，常用的基本数据类型有以下几种： Integer（整数型）、Long（长整 数型）、Single（单精 度实数型）、 Double（双精度实数型）、String（字符串型）、Boolean（逻辑型）、 Date（日期型）。2 .常量：常量是在程序执行过程中其值不变的 存储单元或数据。在 VB 中，常量有整数常量、实数

13、常量、字符 串常量和逻辑常量这几种类型。3变量：变量用来表示数据的存储区，在程序运行过程中，这些存储区中的值是可以改变的。 变量名由字母、数字和下划线等字符组成 ， 但必须以字母 开头，在变量名中对大小写字母是不加区分的。 变量说明语句 的常用形式为： Dim 变量名 As 变量的类型。 4数组：数组是 由一批同类型的变量构成的一个序列，组成数组的每一个变量 被称为数组的元素，也称为下标变量，下标是一个整数，用来 指出某个元素在数组中的位置。 一维数组的常用形式为： Dim 数组变量名 (A1 To A2) As 元素的类型。 二维数组的常用形式为： Dim数组变量名(A1 To A2, B1

14、 To B2) As元素的类型。(六)VB各类表达式与标准函数 考试要求：对所列知识要理解其确切含 义及与其它知识的联系，能够用所学的信息技术知识和操作方 法解决实际问题，熟练应用信息技术进行信息的处理。1VB中的常用标准函数 ( 1)常用数学函数： Abs(X)、Int(X)、Sqr(X)、 Rnd()、 Exp(X)、Log(X)、Sin(X)、 Cos(X)、Tan(X)。( 2)常用类型转换函数和字符串函数：Asc(X)、Chr(X)、Val(X)、 Str(X)、Len(X)、Mid(X,n,k)、Fix(X)。 2基本运算与表达式(1) VB 的基本运算： VB 的基本运算包括算术

15、运算、关系运算和逻辑运算 三大类。算术类基本运算有：人、-、*、/、 、Mod、+、-关系类基本运算有： =、 、 、 = 逻辑类基本运算有： Not 、 And 、 Or ( 2)表达式：表达式主要用来规定值的计算过 程，以及对于某些情况或条件的判断。一个表达式中可能包括 算术运算、关系运算和逻辑运算等多种基本运算，以及这些基 本运算所涉及的数据(变量和常量) 。( 3) 基本运算的优先级 从高到低为：人（1级），-（指负号，2级），*、/ （3级）， （ 4 级）， Mod （ 5 级）， +、 -（ 6 级）， =、 、 、 =（ 7 级）,Not （8 级）,And （9 级）,Or

16、（10 级）。（七）常用的 VB 语句 考试要求：对所列知识要理解其确切含义及与其它知识的 联系，能够用所学的信息技术知识和操作方法解决实际问题， 熟练应用信息技术进行信息的处理。 （八）使用 VB 实现顺序、 选择、循环三种控制结构 考试要求：对所列知识要理解其确切 含义及与其它知识的联系，能够用所学的信息技术知识和操作 方法解决实际问题，熟练应用信息技术进行信息的处理。1 赋值语句： 变量名 = 表达式或 对象名.属性名 = 表达式2选择语句：行 If 语句： If 条件表达式 Then 语句 1 Else语句 2 或 If 条件表达式 Then 语句 块 If 语句：If条件表达式 1

17、Then语句块1Elself条件表达式 2 Then语句块 2,Elself 条件表达式 n Then语句块 nElse语句块0End If 3循环语句：For语句For 循环变量 = 初值 To 终值 Step 步长 语句块Next 循环变量 Do 语句 DoWhile 条件表达式语句块Loop4 注释：注释是以单引号（ ）开头的一串文字，可以出现在程序中需要说明的位置上， 通过这一串文字，对附近的程序段进行简要 的说明，增加程序的可读性。注释对程序的 执行效果没有任何影响，程序运行时自动跳 过注释。 （九）过程、事件处理过程、自定 义函数考试要求：对所列知识要理解其确切 含义及与其它知识的

18、联系，能够用所学的信 息技术知识和操作方法解决实际问题，熟练 应用信息技术进行信息的处理。 1 VB 应用 程序是按模块化的方式组成的，一个程序模 块是程序的一部分，每个模块负责解决整个 应用问题的一部分任务。程序模块分为过程 和函数两种。 2过程：将程序划分成一个 个较小的逻辑单元，每个逻辑单元构成一个 过程。过程中的代码可以被重复调用。过程 分成两类，一类是事件处理过程，另一类是 通用过程。 3事件处理过程： Sub 事件处 理过程名（参数表） 语句块 End Sub其中，事件处理过程名必须符合下面的规则：对象名 _事件的标准名。 VB 的 一些常用对象上的常见事件的标准名有： 文 本 框

19、 Text ： Text_Click、 Text_DblClick、Text_KeyPress 命 令 按 钮 Command ： Command_Click、 Command_DblClick 标 签 Label： KeyPress 4函数：函数是类似于过程 的另一个程序模块，不同之处是函数执行完 成后，函数的计算结果被送到函数的调用点 上，供程序的后继部分继续进行处理。 自定 义函数： Function 函数名(参数表) As 类 型名 语句块 End Function 二、例题分析 1对于对象及其特征的错误 理解是 ()。(A) 对象都具有一个标识自己以区别其他对象的名字。 (B) 对象

20、都具有自身 的属性及其属性值。 (C) 对象一般只用数据 表示属性，但不用代码表示行为。 (D) 对象 都具有自身的行为(操作) 。参考答案： C 所考知识点：对象的概念。 2下列控件中可 用于接受用户输入文本，又可用于显示文本的是 (A) Label 控 件 (B) TextBox控件(C) Timer 控件 (D) CommandButton 控 件 参考答案： B 所考知识点： VB 的界面设计。 3 VB 中保存 工程文件的文件扩展名为(A) vbp(B) frm(C) doc (D)pas 参考答案： A 所考知识点： VB 应用程序的运行和保存 4 VB 语言中，下列各种基本数据类

21、型说明符中表示单精度实 型数的是 (A) Integer (B) Boolean (C) Single (D) String考答案：C所考知识点：基本数据类型 5.在Visual Basic中， 下列属于字符串常量的是 (A) Abs(100) (B) 100 (C) Val(100) (D) 1/2 参考答案： B 所考知识点：数据、标准函数的应用。 解 此题需要了解各函数返回值的数据类型，以及数值和字符串的 表示方法。题中 Abs(函数求的是数值的绝对值，返回的是数值； Val()函数是将数字字符串转换为数值；返回值是数值，1/2本身就是数值；而数字字符串的表示需要加引号。6下列可以作为

22、Visual Basic的变量名的是 (A) sqr (B) 2pai (C) cj1 (D) a+b 参考答案： C 所考知识点：变量的命名。解此题需要了解变量的命名规则。变量名是由字母、数字和下划线等字符的任 意字符组成，但必须以字母开头，另外值得一提的是变量名不 能使用VB中的保留字。题中sqr属于VB的保留字；5pai不是 字母开头；a+b中“ + 号是非法字符。7.函数Sqr(X功能是 (A) 求X的算术平方根(B)求X的绝对值(C)求不大于X的最大整数(D)数值X转换成字串X参考答案：A所考知识点：标准 函数。 8下列运算结果中，值最大的是(A) 34 (B) 3/4 (C)4 m

23、od 3 (D) 3 mod 4 参考答案： D 所考知识点：算术类基本运 算符此题考生需注意“/、“”、“mod三个有关除的运算符的区别 93 mod 2 + 3 2 的执行结果为(A) -1 (B) 3 (C) 2 (D) 0参考答案： C 所考知识点：算术类基本运算10a=5， b=7， c=-2, d=1 时，下列结果为 False的是 (A) a + b c + d And a = 5Or Not c 0 Or d a + b And a = 5 Or Not c 0 Or d 0 (C) a + b c + d And a 0 Or d 0 (D) a + d = 5 Or Not

24、 c 0 Or d 0 then x=y-3 Elsey=x+3 y 的值是 (A) 2(B) -23 (C) 8(D) -17参 考答案： C 所考知识点：选择语句 1 8循环语句 For i=1 To 10 step 2 的循环次数是 (A) 5 (B) 9 (C) 8 (D) 10参考答案： A 所考知 识点：循环语句的运用 19有如下程序段： x=2 For l=1 To 3 If x I Then x = x + I End If Next该程序段运行后，x的值为(A) 2 (B) 4 (C) 5 (D) 720下列程序段的执行结果为参考答案： C 所考知识点：选择语句与循环语句的嵌

25、套运用n=1: s=0 Do while s20 s=s+n n=n+2 Loop Print n; s （A） 9 16 （B） 11 25 （C） 11 20 （D） 9 24 参考答案： B 所考知识点： Do 循环语句的运用第三单元 算法的程序实现 一、知识内容 （一）枚举算法及程 序实现考试要求：对所列知识要理解其确切含义及与其它知识 的联系，能够用所学的信息技术知识和操作方法解决实际问题， 熟练应用信息技术进行信息的处理。 枚举算法的基本思想是根 据问题的本身性质，一一列举出该问题所有可能的情况，并根 据题目的条件逐个作出判断，从中挑选出符合条件的解答。 枚 举算法属于搜索策略，适

26、用于那些解变量确定的连续值域的问 题。设置枚举算法要列举出所有可能的情况，不能遗漏，也不 能重复。 （二）解析算法及程序实现考试要求：对所列知识要 理解其确切含义及与其它知识的联系，能够用所学的信息技术 知识和操作方法解决实际问题，熟练应用信息技术进行信息的 处理。 解析算法的基本思想是用解析的方法找出表示问题的前 提条件与所求结果之间关系的数学表达式，并通过数学表达式 的计算来实现问题的求解。 （三）排序算法及程序实现考试要 求：对所列知识要理解其确切含义及与其它知识的联系，能够 用所学的信息技术知识和操作方法解决实际问题，熟练应用信 息技术进行信息的处理。 1冒泡排序 冒泡排序的基本思想是

27、 在待排序的数据中，先找到最小（大）的数据将它放到最前面， 再从第二个数据开始，找到第二小（大）的数据将它放到第二 个位置，以此类推，直到只剩下最后一个数据为止。 相邻的两 两排， 2选择排序 选择排序的基本思想是在所有的记录中选 出最小（大）的数据，把它与第一个数据交换，然后在其余的 记录中再选出最小（大）的数据与第二个数据交换，依此类推， 直至所有数据排序完成。 （四）查找算法及程序实现考试要求： 对所列知识要理解其确切含义及与其它知识的联系，能够用所 学的信息技术知识和操作方法解决实际问题，熟练应用信息技 术进行信息的处理。 1顺序查找 顺序查找的基本思想是从第 一个数据开始，按数据的顺

28、序逐个将数据与给定的值进行比较， 若某个数据和给定值相等，则查找成功，找到所查数据的位置； 反之，查找不成功。 2对分查找 对分查找的基本思想是在有 序的数据列中，首先将要查找的数据与有序数组内处于中间位 置的数据进行比较，如果两者相等，则查找成功；否则根据数 组元素的有序性，就可确定该数据应该在数组的前半部分还是 后半部分继续进行查找；在新确定的范围内，继续按上述方法 进行查找，直到找到要查找的数据，使查找成功，或直到子表 不存在，查找不成功。 对分查找的条件是被查找的数据必须是 有序 的。 （五）递归算法 考试要求：对所列知识要知道其内容 及含义，并能用自己的语言或动作进行表达、判断和直接

29、运用。 函数或过程调用它本身，称为递归。递归算法的基本思想是把 规模较大的、较难解决的问题变成规模较小的、容易解决的同 一问题，规模较小的问题又变成规模更小的问题 ，当问题小到 一定程度时，可以直接得出它的解，从而得到原来问题的解。即采用 “大事化小、小事化了 ”的基本思想。 采用递归算法的条 件：(1)每一步骤解决问题的方法要一致； ( 2)有边界条件。 二、例题分析 1有 5 位运动员 100 米成绩依次为 13.8，12.5， 13.0，13.2，13.4，原始数据 13.8 12.5 13.0 13.2 13.4 第一趟 12.5 13.8 13.0 13.2 13.4 第二趟 第三趟

30、 12.5 13.0 13.2 13.8 13.4 第四趟 12.5 13.0 13.2 13.4 13.8 若采用选择排序算法对其进行从小到大排序，则 第二趟的排序结果是 (A) 12.5 13.8 13.2 13.4 13.0 (B) 12.5 13.4 13.2 13.8 13.0 (C) 12.5 13.0 13.8 13.2 13.4 (D) 12.5 13.2 13.8 13.4 13.0 参考答案： C 所考知识点：选择排序 选择 排序的基本思想是在所有的记录中选出最小(大)的数据，把 它与第一个数据交换，然后在其余的记录中再选出最小(大) 的数据与第二个数据交换，依此类推，直至

31、所有数据排序完成。 此题中要从小到大排序，并且已经实现第一趟排序，故在后面 4 个数据当中找出最小的数据 “ 13.0与”第 2 个数据 “ 13.8交”换， 所以结果选 C 2数列 1， 4，7， 10，13，, 的递推公式为 ( )。 (A) f(1)=1;f(n)=n+3 (B) f(1)=1;f(n)=n*2-1 (C) f(1)=1;f(n)=n*2+1 (D) f(1)=1;f(n)=f(n-1)+3 参考答案： D 所考知识点：递归算法 由 数列可推出规律，从第二项开始，每一项跟前一项的差为3，故得出递推公式 3用选择排序法对数据 7，6，3，9，2 从大 到小排序，共需经过多少

32、次数据对调。 (A) 3 (B) 4 (C) 5 (D) 10 参考答案： A 所考知识点：选择排序 此题只能根据选择排序 的思路，共需进行四趟比较，具体过程如下： 原始数据 7 6 3 9 2 第一趟 9 6 3 7 2 第二趟 9 7 3 6 2 第三趟 9 7 6 3 2 第四趟 9 7 6 3 2 其中，第四趟不需要进行数据对调，前三趟都进行了对调 4要从 n 个数据元素中顺序查找一个元素，最多查找次数是 (A) 1 (B) n (C) n/2 (D) lgn 参考答案： B 所考知识点：顺序查 找 此题稍简单，只要稍理解顺序查找的概念，就能选择答案5.对分查找算法的前提是(A)被查找

33、数据元素个数是奇数(B)被查找数据元素个数是偶数 (C)被查找数据元素是有序的(D)被查找数据元素是无序的 参考答案： C 所考知识点：对分查找 的概念 此题稍简单，只要稍理解对分查找的概念，就能选择答 案 6.用对分查找法从数列 3， 6， 7，10， 12，16，25，30，75 中找到数据 10 的最少查找次数是 (A) 2(B) 3(C) 4(D)7 参考答案： B 所考知识点：对分查找 用对分查找的方法需分 别对上列数据进行编号，共 9 个数，依次序号为 19。按照对 分查找的思路，依次查找的数据为12、7、10，所以查找次数为 3 次。强化练习(综合题) 1.有如下Visual B

34、asic程序段: a=How b= are you c=a+b亥程序段运行后，变量 c的值是 参考答案: How are you 本题是读程序写结果题，属于基础题， 是主要是考核字符串数据类型中 “+(”字符串连接)含义的理解 2.有如下程序段:x=3 y=4 z=5 If x+y=z Or y+z=x Or x+z=y then a=FalseElse a=True 亥程序段运行后， a 的值是 参考答案： True 本题是读程序写结果题，属于基础题，主要是考核分支If语句以及逻辑类运算符“ OI的理解3 .有如下VB程序段： Dim n As Integer Dim m As Intege

35、r m = 0 For n = 1 To 15 m = m + n mod 5 Next该程序段运行后，变量 m的值 是参考答案： 30 本题是基础题本题是读程序写结果题，属于基础题，主要是考核循环 For 语句以及运算符“Mod”的理解 4 .有如下 VB程序段： n=3 s=3;n=6 s=9;n=9 s=18;n=12 s=30;n=15 s=45;n=18 s= n = 0 s = 0 Do While n =0 (1) Then If x = 7 The n y = Sqr(x ) Else y = x 八 2 Else If x 0(2)y=3*x +2 本题是改错题，属于基础题，

36、主要考核算术表达式以及分支结构的条件语句6.下面程序的功能是：计算表达式 2+4+6+2n的值，在文本框 Text1中输入n 的值，结果在文本框Text2中输出。则程序中划线处的语句应更 正为 (1 )( 2)Private Sub Command1_Click()Dim sum As Long, , i As Integer , n As Integer sum = 0 n =Val(Text1.Text) For I = 2 To 2 * n Step 2 sum = sum + 2 *i (1)Next I Text2.Text=Val(sum) (2) End Sub 参考答案：(1)

37、 sum=sum+i (2) Text2.Text=Str (sum) 本题是改错题，属于基 础题，只要是考核 FOR语句的步长step的作用，以及 Vai函数 和 Str 函数作用的区别 7下面程序的功能是：鸡翁一，值钱五， 鸡母一，值钱三，鸡雏三，值钱一(鸡雏三三买之) 。百 钱买百 鸡，问鸡翁、母、雏各几何？则程序中划线处的语句应更正为 (1)( 2)Private Sub Form_Ciick()Dim x, y, z As Integer For x = 0 To 20 For y = 0 To 33 z = 100 - x - y If 5 * x + 3 * y + z 3 =

38、100 or z Mod 3=0 (1) Then Print x; y; z End If Next Z Next xEnd Sub 参考答案： (1) Next Y (2)5 * x + 3 * y + z 3 = 100 and z Mod 3=0 本题是改错题，属于基础题，只要是考核 FOR 语句的结构，以及逻辑类运算符“or和“and的不同含义 8W 0.0001下面程序的功能是：求的值，直至最后一项的值。 则程序中划线2(1)处的语句应更正为() Private Sub Form_Ciick() N = 1: Sum = 0 (1)Do N = N + 2 Term = 1 / (

39、N 八 2) Sum = Sum + Term LoopUntii term=0.0001 (2) Print 运算结果为： ; Sum Print 最后 一项的值为： ; Term End Sub 参考答案： (1)sum=1(2)term=0.0001 本题是改错题，属于稍难题，只要是考核 Do Untii 语句的理解，尤其注意在循环中累加器的初值设置以及循环终 止条件，不要产生死循环。9 完成程序中的空格，打印显示 如图片所示的九九乘法表： 解决上述问题的 Visual Basic 程 序如下，为了实现这一目标，在划线处，填入合适的语句或表达式是(1)(2)Private Sub For

40、m_Load() Form1.Show For a = 1 To 9 For b=1 To (1)Print a; x ； b; =(2)Next b PrintNext a End Sub 1.a 2.a*b; 本题是程序填空题，属于容易 题，主要考核解析算法的程序实现。10 下面是一个元旦文艺会演评分程序。 10 位评委，除去一个最高分和一个最低分，计 算平均分 (评满分为 10 分)。 解决上述问题的 Visual Basic 程序 如下，为了实现这一目标，在划线处，填入合适的语句或表达式是 (1)(2)Max=0:Min=10 For 1=1 to 10 N=Val(lnputBo 请

41、输入分数)If Then Max=N If N Max (2) S=S-Max-Min本题是程序填空题，属于容易题，主要考核解析算法的 程序实现。 11. 有 30个人，其中有男人、女人和小孩。他们在一家饭馆里花去 500元。已知，每个男人花 30元，每 个女人花20元，每个小孩花10元。问男人、女人、小孩各为多少人？解决上述问题的 Visual Basic程序如下，为了实 现这一目标，在划线处，填入合适的语句或表达式是( 1)( 2)Subcommand1_click() Dim man, woman, child, s As Integer For man = 1 To 15 For wo

42、man = 1 To 23 child =(1)s = 30 * man + 20 * woman + 10 * child If (2) Then list1.AddItem Str(man) + Str(woman) + Str(child) End IfNext woman Next man End Sub参考答案：(1) 30-man-woman (2)s=500或者500=s本题是程序填空题，属于稍难 题，主要考核枚举算法的程序实现。 12. 如果一个三位数等于它的每个数字的立方和，则此数称为 “水仙花”数。如：3 3 3 153= 1 + 5+ 3故153是水仙花数。下面程序用于求

43、出 100999之间的全部水仙花数解决上述问题的 VisualBasic程序如下，为了实现这一目标，在划线处，填入合适的语句或表达式是(1)(2)sub command1_click() for m=100 to 999a=int(m/100)b=int(m-100*a)/10)c=m-100*a-10*b n=ifthen list1.additem str(m) next m end sub参考答案：( 1 ) a*a*a+b*b*b+c*c*c(2) m=n 本题是程序填空题，属于稍难题，主要考核枚举算法的程序实现。*13 如下程序段的功能是：随机产生 8 个 1-100 之间的正整 数

44、，按升序将 10 个数据排序输出。 为了实现这一目标，在划 线 处 ， 填 入 合 适 的 语 句 或 表 达 式 是( 1 )2)3)Const n=8 Dima(1 to n) As Integer Dim I , j , t , k as integer For i = 1 To n ( 1) Next i For i = 1 To n-1For j (= 2) To nIf (3) Thent = d(i): d(i) = d(k): d(k) = t End If Next j Next I 参考答案： (1) a(i) = Int(100 * Rnd + 1)或 a(I) = In

45、t(100 * Rnd() + 1) (2)I+1 (3)a(i) a(j)或 a(i) = a(j)本题是程序填空题，属于稍难题，主要 考核冒泡排序的程序实现，同时也考核函数 Rnd 和 Int 的正确 使用。 *14 下列程序的功能是：在一个有序的序列中查找数 值 50，同时统计查找的次数并显示查找次数。为了实现这一目标， 在划线处， 填入合适的语句或表达式是(1)(2) (3)Dim a(1 to 8)As Integer (定义在通用里，数组元素通过另一事件产生) Private Sub Command1_Click() Dim m As Integer, I As Integer,

46、j As Integer, x As Integer, total As IntegerDim f As Boolean= False: x =30: i = 1: j = 8:total= 0Do While( 1 ) And (f =False)total = total + 1m=( 2)lf a(m) = xhenf = TrueElself x a(m) Thenj = m - 1Elsei =m + 1End lfEnd lfLooplf f = True ThenLabel1.Caption = ( 3)ElseLabel1.Caption = 找不到该数值 End IfEnd

47、Sub 参考答案： (1) i a(j)或 a(i) = a(j)本题是程序填空题，属于稍难题，主要考核对分查找的程序实现。 *15 下列程序的功 能是：某班级 45 名学生，每位学生中文姓名均不相同，并且都 有一个英文名。下面程序的功能是根据学生的中文姓名查找相 应的英文名，其中学号存储在数组 sno 中，英文名存储在数组 sname 中，中文姓名存储在数组 ch 中。在文本框 text1 中输入 要查找的中文姓名，单击 开始查找 按钮，如果查找成功，则 在文本框 Text2 中输出该学生的学号、中文姓名和英文名，否则 在文本框 Text2 中输出 查无此人！ 。 为了实现这一目标，在 划

48、线 处 ， 填 入 合 适 的 语 句 或 表 达 式 是 ( 1 ) ( 2)(3)Private SubCommand1_Click() Dim key As String, i As Integer Dim n As Integer, found As Boolean found = False n = 0 : i = 1 (1) Do While i = 45 And Not found If ch(i) = key Then n = i: (2) i = i + 1 Loop If (3) TheTnext2.Text = 查无此人！ Else Text2.Text = Str(sn

49、o(n) + 号 : + ch(n) + 的英 文名是 + sname(n) End If End Sub 参考答案： (1) key=text1.text (2)found=true (3)not found 本题是程序填空题， 属于稍难题，主要考核顺序查找的程序实现。16下列程序的功能是：求两个正整数的最大公约数。求两个正整数的最大公 约数可以采用辗转相除法求解。在文本框text1 、text2 中获取两个数据m、n,将结果显示在文本框text3上。以下是辗转相除 法的算法：分别用 m , n , r 表示被除数、除数、余数 求 m/n的余数若r=0。则n为最大公约数。若r0,执行第3步

50、将n 的值放在 m 中，将 r 的值放在 n 中。 返回重新执行第 步 为了实现这一目标，在划线处，填入合适的语句或表达式是(1) (2)(3)Private Sub Command1_Click() Dim m , n , i As Integer m=Val(text1.text) n=Val(text2.text) (1)Do While r0m=n (2)r=m mod nLoopText3.text= (3) End Sub 参考答案： (1) r=m mod n (2)n=r(3) str(n) 本题是程序填空题，属于稍难题，主要考核实现给出算 法的相关程序的能力。 *17 已知四

51、位数 3025 有一个特殊的 性质：她的前两位数字 30 和后两位数字 25 的和是 55，而 55 的平方和刚好等于该数( 552=3025)。下面程序求具有这种性质 的所有四位数。 其中，上述界面中 “开始处理 ”按钮的名称是“ Comma nd”布尔型函数special(x)作用判断x是否具有这种性 质的四位数，若x是具有这种性质的四位数，其值为 True，否 则为 False。 请在下列程序代码的基础上按照要求设计该程序。Dim n As In teger, a As In tegerFun cti on special(x as in teger) AsBoolean End Fun

52、ction Private Sub Command1_Click() For a = 1000 To 9999 If special(a) Then List1.AddItem (Str(a) Next a End Sub操作要求：(1)完善程序中的 Fun ction special (x)部分(2) 在子程序 Private Sub Comma nd1_Click()中，主要采用的算法是： 。 参考答案： (1) Dim a, b As Integer a = xMod 100b = x 100a = a + bIf a 八 2 = x Then special = True Else specail = flase 枚举 本题 是补充一段程序，属于难题，主要考核自定义函数的能力。*18 下面程序求 2 到 1000 之间的平方数对，在文本框 text1 中输入