2022年桐乡一中_信息技术期中考试试卷及答案_算法与程序设计 .pdf

《2022年桐乡一中_信息技术期中考试试卷及答案_算法与程序设计 .pdf》由会员分享，可在线阅读，更多相关《2022年桐乡一中_信息技术期中考试试卷及答案_算法与程序设计 .pdf（9页珍藏版）》请在淘文阁 - 分享文档赚钱的网站上搜索。

1、优秀学习资料欢迎下载（算法与程序设计模块）试卷说明：试卷满分100 分，考试时间60 分钟一、选择题（本大题共25 个小题，每题2 分，共 50 分）1计算机解决问题的三个步骤中不包括下面哪一步骤( ) （ A）需求分析（B）问题反思（C）算法分析（D）用计算机编写程序2对于一个完整的算法的流程图，下列说法不正确的是( ) （ A）有而且只有一对框（B）不一定有框（ C）不一定有框（D）分支结构中一定有框3下列算法展示了一台自动售货机一次售货的工作流程：步骤 1：提示“请投币”步骤 2：若硬币面值不是0.1 元、 0.5 元、 1 元，退回硬币，并跳回步骤1 步骤 3：若投入货款达1.5 元或

2、以上，执行步骤4，否则执行步骤1 步骤 4：售出一个口香糖步骤 5：从接收货款中减去1.5 元步骤 6：退回余额下列关于这个算法说法正确的是（）（ A）上述算法采用伪代码表示（B）这台自动售货机在任何情况下也不会售出口香糖（ C）上述算法包含有顺序结构（D）这台自动售货机只会在接受硬币达2 元时才放出口香糖4下列关于类、对象、属性、事件的描述中，错误的是( ) （ A）同一类对象具有同一类属性，但同一个属性可以有不同的属性值（ B） “Private Sub Command_Click()”中的“ Click ”属于事件（ C）VB编程界面中，双击窗体中某对象，出现的是代码窗口（ D）对象的属

3、性值在程序运行过程中不可修改5VB语句 Text1.Text=Text用于在文本框中显示字符串，该语句中的“Text1 ”是（）（ A）属性值（B）对象名（C）属性名（D）类名6小张用 VB做了一个小游戏，他想把自己做的程序放在因特网上供他人下载使用，他应该将自己做的程序保存为什么格式供他人下载( ) （ A）Frm （B）Exe （C）Swf （D） Vbp 7下列变量命名正确的是（ A）IsTrue （B）Next （C）A-3 （D） 3Str 8一 个摸 球游 戏的流程图如 右图所 示 ( 红球总数和 绿球总数均 大于0) 。游 戏结 束时，S 位所 代表 的是( ) （ A）摸到的绿

4、球数（B）摸到的红球数（C）未摸到的绿球数（D）未摸到的红球数精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 1 页，共 9 页优秀学习资料欢迎下载第 8题图第9题图9有如下一段VB 程序段，当该程序结束后，程序中的代码“S = S * K”共被执行了多少次( ) （ A）6 （B）8 （C）9 （D） 12 10以下变量定义错误的是（ A）定义一个变量存放客户姓名：Dim Name as String （ B）定义一个变量存放客户性别：Dim Addr as Boolean （ C）定义一个变量存放客户电话：Dim Tel as String （

5、 D）定义一个变量存放QQ号码： Dim QQ as Integer 11Dim arr(1 to 10 , 11 to 20) as integer 该指令定义了多少个数组元素（ A）10 （B）20 （C）100 （D） 200 12如果 x=4，那么以下运算结果为True 的表达式是( ) （ A） x=6 （B） x4 Or x=6 （ C） x6 （D） not x4 13已知整型变量X的值为 -3 ，则 VB表达式 Int(x/2)的值是( ) （ A）-2 （B）0 （C）-1 （D）2 14下列 VB函数中，与Val 函数作用相反的是( ) （ A）Len （B）Abs （C）

6、Str （D）Asc 15在 VB中，设 X=7146，能得到其十位上数字 4 的正确表达式是( ) （ A）x10 mod 100 （B）x10 mod 10 （ C）x100 mod 10 （D）x mod 1010 16VB标准函数Rnd函数的作用是返回一个大于等于0 且小于 1 的随机实数，只产生大于等于10 且小于 100 随机整数的VB表达式是( ) （ A）Int(Rnd*100) （B）Int(Rnd *90 +10) （ C）Int (Rnd *99 +1) （D）Int ( Rnd *99+10 ) 17观察如下VB程序设计界面，选出下面说法错误的一项( ) （ A）该界面

7、中共有3 个标签对象，属于标签类。（ B）该界面中的命令按钮的Caption 属性被设置为了“计算”。（ C）该 VB程序保存时，有关窗口界面的信息被保存在“.Frm ”文件中。S = 1 For K = 1 to 6 step 2 For J = 5 to 12 Step 3 S = S * K Next J Next K Print S 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 2 页，共 9 页优秀学习资料欢迎下载（ D）该界面中共有4 个文本框对象，它们的Text 属性值在当前状态下一样。第 17 题图第 18-19 题图 18 读右

8、边程序，程序中一共标明了8 条语句，下列说法错误的是( ) （A）赋值语句，不是赋值语句（B）是注释语句，对程序运行不产生影响（C）描述的是累加器，描述的是计数器（D）程序中包含了赋值语句、选择语句、循环语句和注释语句19右边程序中，最后输出s 和 c 的值分别是：( ) （ A）6 , 4 （B）6 , 3 （C）9 , 4 （D）9 , 3 20以下是一个事件处理过程，这个过程的名称为( )Sub C1_DblClick() Print * End Sub （A）C1 （B）C1_ DblClick （C） print （D）DblClick 21下列问题适合用解析算法求解的是（）（ A）

9、寻找一堆彩球中所有的红球（ B）计算一个球从100 米高的楼顶掉下来的落地速度（ C）将全班同学按身高从低到高排队（ D）从电子词库中找到Infomation 这个单词22如果一个自然数恰好等于它的因子之和，称这个数为“完数”，如： 6=1+2+3。某算法能找出1000 以内所有的完数，那么这个算法主要用到的方法是（ A）枚举（B）解析（C）排序（D）查找23VB中常常需要用户自己来定义函数，下列属于定义函数的语句是( ) （ A）Dim 函数名 as 类型名（B）Function函数名 as 类型名（ C）Const 函数名 = 数值（D） Dim 函数名（ a1 to a2）as 数据类型

10、24小明买了6 个苹果，这6 个苹果的重量（单位：两）分别为8.1 、3.4 、9.5 、2.2 、1.2 、5.6 ，若采用选择排Sub command1_click( ) Dim s as integer Dim c as integer Dim k as integer s=0 : c=0 : k=1 Do while k= 3 循环开始 If s=3 then s=s*2 s= s+k k=k+1 c=c+1 Loop Print s,c End sub 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 3 页，共 9 页优秀学习资料欢迎下载

11、序算法对其进行从小到大排序，则需要进行数据互换的次数是（）（A） 2 （B） 3 （C） 4 （D） 5 25五位评委给歌手打分的成绩依次为93，85，92，84，90，原始数据93 85 92 84 90 第一趟84 93 85 92 90 第二趟第三趟84 85 90 93 92 第四趟84 85 90 92 93 若采用 冒泡排序 算法对其进行 从小到大 排序，则第二趟的排序结果是（ A） 84 90 85 93 92 （B） 84 93 85 90 92 （ C） 84 85 93 90 92 （D） 84 90 92 85 93 二、 VB表达式书写与求值（本大题共5 个小题，每题2

12、 分，共 10 分）26sqr(25)+ len(“abc”) 的返回值是 _ 。27Mid( “2009 乌镇欢迎你 ! ”, 5 ,2 )的返回值是 _。28把数学中的式子，acba2|32|2转化为 VB中的表达式 _。29写出数学表达式cba并且0a的 VB表达式 _ 。30求下列 VB表达式 92+1 Mod 2+Int（-11/3 ）的值 _。精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 4 页，共 9 页优秀学习资料欢迎下载三、 读程序（本大题共7 个小题，每题2 分，共 14 分）31. 有如下 Visual Basic程序段：P

13、rivate Sub Command1_Click() Dim m As string, t As integer m = Love t = 1314 Label1.Caption = m + str(t) End sub 该程序段运行后， 在标签 Label1 上显示的是 _。32. 有如下 Visual Basic程序段：Private Sub Command1_Click() Dim a As string, b As string Dim c As Long a =123 b =456 If a b Then c=val(a+b) Else c = val(a)+val(b) End

14、If Print c End sub 该程序段运行后，c 的值是 _。33有如下Visual Basic程序段： x = 1 For i = 5 To 12 Step 2 x = x + i Next i 该程序段运行后，x 的值是 _。34. 有如下 Visual Basic程序段：s = 0: i = 1 Do While s 10 s = s + i i = i + 2 Loop 该程序段运行后，s 的值是 _。35. 有如下 Visual Basic程序段：x = 3 For i = 3 To 6 If x 15 Then x = x * i Else x = x + i End If

15、 Next i 该程序段运行后，x 的值是 _。36 如 下 程 序 运 行 后 输 出 的 结 果 为 ：_。Private sub test36( ) Dim i as integer, j as integer Dim s as integer For i=1 to 20 For j=15 to 2 step -2 S=i*j Next j Next i Print s End sub 37 如下程序运行后， 输出结果为 _。 Private sub test( ) Dim i as Integer Dim Arr(1 to 10) as integer For i =1 to 10 A

16、rr( i )= i * i Next i Print Arr( 8 ) End Sub 精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 5 页，共 9 页优秀学习资料欢迎下载四、程序填空或改错（本大题共5 题，每空 2 分，共 26 分）38有如下程序，缺少一变量定义语句，请补充完整： （注：输出的结果为 250000 ）Private Sub Test Dim a as Integer 定义变量sum Sum=0 For a =1 to 1000 step 2 Sum=Sum+a Next a Print Sum End Sub 39. 一个酵

17、母细胞每一分钟分裂为2个，在下一分钟，就有4个细胞，然后，8个、 16个、以此类推。一个酵母细胞，经过多少分钟后数目超过250个。解决此问题的部分程序如下：Dim n as long ,x as long n = 1 : x = 2 Do while x = 100 n = n + 1 x = x2 Loop 问：（1）为了实现这一目标，程序划线处的表达式应更正为_。（2）运行更正后的程序，在经过_分钟后细胞数目超过250个。40如下是计算圆面积的VB界面和所有程序代码：（1）由 VB界面和程序代码可知，用于输入圆半径的文本框对象名为：_。（2）为实现圆面积的计算，用户除了点击计算按钮，还可以

18、执行的操作有:_ 。精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 6 页，共 9 页优秀学习资料欢迎下载41把整数 3025 从中剪开分为30 和 25，将这两个数之和平方： （30+25）2=3025，则其计算结果又等于原数。求所有符合这样条件的四位数，将下面程序中画线处填写完整。（1）_ （2）_ Private Sub Command1_Click() Dim n as Integer, a as Integer, x as Integer Dim n1 as Integer, n2 as Integer List1.Clear For a

19、=32 to 99 n=a*a (1) n2=n mod 100 x=n1+n2 if (2) then List1.AddItem Str( n ) Next a End Sub 42某地出租车计价方式如下：3 公里内（包括3 公里）起步价10 元；超过 3 公里，但10公里内，则3 公里内收费10 元，超出部分每公里2 元；如果超过10 公里，则 10 公里内收费24 元，超出部分每公里3 元。其程序实现如下：Private Sub Command1_Click( ) x=val( Text1.Text ) if x10 then y = (2) if x=b and b=c and a0

20、_ 30 _1_ 三、读程序（本大题共8 个小题，每题2 分，共 16 分）31 _ Love1314_ _ _ 32 _123456_ 33 _ _33_ _ 34_16_ 35 _47_ _ 36_60_ 37 _64_ 四、程序填空和改错（本大题共26 分，每空2 分）38 _ Dim sum as Long _ 把 sum写成 s 也给分39 （1）_ x = 2*x _ （2）_8_ 40 （1）_ TextR_ _（2）_按回车键 _ 41 （1）_ n1=n100_ _（2）_n=x2_ 或者 n=x*x_ _ 42 （1）_ x3 and xd(j-1)_、 _ d(k)_ （降序）或者 _ d(j)d(j-1)_、 _ d(11-k)_ （升序）两空答案要保持一致学校_班级_学号_准考证号_精选学习资料 - - - - - - - - - 名师归纳总结 - - - - - - -第 9 页，共 9 页