浙江省信息技术期末考试试卷及其答案

1、浙江省信息技术期末考试试卷及其答案TTA standardization office TTA 5AB- TTAK 08- TT浙江省高一信息期末考试试卷（答案填写在答卷卡上，在试卷上答题无效，答卷卡上按规定填写班级、学 号、姓名并且正确填涂准考证号码和答案）一、选择题（共30小题，每小题2分，共60分，每题只有一个正确答案）1、用计算机无法解决打印所有偶数的问题，其原因是解决该问题的算法违背了算法特征中的（）。A、唯一性B、有穷性C、能行性D、有输出2、做匀加速直线运动物体的即时速度计算公式是vt = v0 + at,其中v0是初速度，a是加速度，t是时间。计算步骤有：用公式计算即时速度vt

2、 = vO + at2输入初速度vO、加速度a和时间t结束输出结果vt其正确的顺序是（）。A、®B、C、D、®3、计算梯形面积的算法描述如下：输入上底a、下底b和高h计算梯形面积s （计算公式为：s=（a+b）*h/2）输出结果结束 上述算法属于（A、解析算法B、排序算法C、递归算法D、枚举算4、下面3个流程图片段依次分别是什么结构（)A、选择、顺序、循环B、顺序、选择、循环C、顺序、循环、选择D、选择、循环、顺序5、下列程序设计语言中哪一个不是面向对象的程序设计语言（）A、 CB、 C+C、 C#D、 VC+6、VB程序的工程文件名、窗体文件名以及生成的可执行文件名分别是

3、A、 vb、 frms . exeB、 . vbws .exe、 . frmC、7、 vbws . frmx . exeD、 .vbp、frm、 . exe该流程图中循环部分结束后，变量S的值是（A、3B、6C、10D、158、在VB中，要添加一个列表框（listbox）,在工具箱中要单击的控件是()OA、国B、Ac HiD、9、小明使用W控件设计一个秒表，倒计时时间精确到秒，如右图，设置该控件的interval属性值为（）oAs 0 B、 1 C、 10 D、 100按字©序按分类序|名称J*'imer 1EnabledTrueIndexInterval0Left3360T

4、agTop1320息性-Timerlx| Timex_1 Tim"10、在Visual Basic中，语句=欢迎使用In.t erval程晶鹭餐舞友调用Timer控件的Timer事件间本系统!中的Caption是（）。A、属性值C、对象名B、属性名D、类名11、在Visual Basic中下列能作为变量名的是（）。A、 a_5 B、 a-5C、 5a D、 A&512、某校对新入学的320名高一男生进行1000米耐久跑测试，测试成绩保留2位小数。在Visual Basic中，下列存储成绩数据的变量定义最合适的是()OA、定义320个整数型变量B、定义1000个整数型变量C、定

5、义一个元素个数为320的一维数组，数据类型为整数型D、定义一个元素个数为320的一维数组，数据类型为单精度实数型13、11、在 Visual Basic 中，表达式 12345100 的值是()。A、 123B、 45C、 12D、 5则数组a包含的元素的个数为A、120B、75C、60D、1314、如下数组声明语句:Dim a (3,如To 2, 5)15.有如下Visual Basic程序段：For x = 10 To 1 Step -2a(x) = x + 1Next x该程序段运行后数组元素X的值为()。D、-1A、 10B、 1C、 016、有如下Visual Basic程序段：s

6、= 0For k =To 5s = s + kNext k该程序段运行后，循环体S=s + k被执行10次，则循环变量k的初值是A、14B、-5C、1D、-417、设x是正数，下列能用于描述x是否为偶数的Visual Basic条件表达式是()。As x 2 = 0 Bs x / 2 = 0 C、x Mod 2 = 0 D、x = Abs (x)18、设 a=l, b=3, c=5,表达式 a*3c OR b>c AND 2*bc 的值是()。A、 1B、 -1 C、 FalseD、 True19、随机产生10个10, 99中的整数,依次存储到数组变量a(l) a(10)中。实现此功能的

7、部分算法流程图如图所示：图中空白处理框和处应填入的是(A、 i i + 1 a(i) - Rnd * 90+10C、 a(i) - Int (Rnd * 90)+1010B、 i i + 1 a(i) - Int(Rnd * 90)+10D、 a(i) - Int(Rnd * 89) +20、猴子吃桃问题：一天，有一只猴子从树 下若干个桃子，当即吃了一半，觉得不过瘾， 了一个。第二天小猴子接着吃剩下的一半，还 不过瘾，又吃了一个。以后每天都是吃前一天 的一半并再吃多一个。到第四天，猴子按规则 桃子后，只剩一个桃子。问小猴子第一天摘了 个桃子。右图所示是根据分析所画出的部分流 采用倒推算法，其中

8、设定M的初始值为1 （第四 完后剩下的桃子数），D为天数（初始值为 下面的和（对应流程图中相应空缺位置） 相应选项。、分别为（）。请在A、 M=M*2+lD=1B、 M=M*2+lD<1C、M=2*(M+1)D= 1D、M=2*(M+1)D<121、有如下Visual Basic程序段：a = 3b = 9c = a + bIf c = 12 Then py ="正确"Else py = 不正确分析该程序段，下列说法正确的是（）。A、程序段的流程模式是循环模式B、“c=12,是赋值语句C、“py=正确一是选择语句D、执行语句“py=正确”的前提条件是“c=12”

9、为真22、VB中，设x=298,能得到其个位数字“8”的正确表达式是()0A、 Int(x/100)*100 B、 Int(x/10)*10 Cs Int(x/100) D、 x-Int(x/10)*1023、运行如下Visual Basic程序，单击命令按钮Commandl,出现如图所示的出错信息。发生下标越界错误时所执行的语句是()。Private Sub Commandl-ClickODim a(0 To 5) As IntegerDim i As Integer1a(0) = 1'For i = 1 To 5a(i) = 2 * a(i - 1) + 1'Next i二

10、 Str (a (6)'End SubA、B、C、D、24、运行如下Visual Basic程序，单击命令按钮Commandl,出现如图所示的出错信息。发生类型不匹配错误时所执行的语句是（）。Private Sub Commandl-Click() Dim a As Integer, b As Integera = 10=a+b= + Vai(a + b)''，b = 20End Sub'A、B、C、D、25、在Visual Basic中，有如下程序：Private Sub Command1_C1ick()Dim a As Integer, b As Integ

11、er, c As IntegerDim d As Integer, z As Integera = Vai： b = Vai： c = Vaid = max (a, b)z = max (d, c)=Str(d)=Str (z)End SubFunction max(x As Integer, y As Integer) As IntegerIf x > y Then max = x Else max = yEnd Function运行该程序，在文本框Textl、文本框Text2、文本框Text3中分别输入2、-5、6后，单击命令按钮Commands文本框Text5中显示的是()。A、

12、-5B、 2C、 6D、 24 26、要计算S=l-2+3-4+5TOO以下不正确的程序段是（S=0 ： T=1S二 0S 二0S=0 ： Sl=0 ： S2=0For i=l to 100For i=l to 100For i=l toFor i=l to 50S=s+i*TS=s+i*(-100Sl=sl+2*i-lT 二-Tl)"(i+l)S=s+i*(-l)-iS2=s2+2*iNext iNext iNext iNext iA、B、C、D、27、下列语句执行后，s的值为()。For i=l to 30If i mod 5=0 thens=s+ii = i+6 end if

13、next iD、75A、45B、55C、6528、有如下Visual Basic程序段:k 二 1For j = 2 To 100If a(j) > a(k) Then k = jNext jx 二 a(k)该程序段执行后，变量x中存储的是()。A、a(l)至a(100)中的最小值C、a (2)至a (100)中的最小值B、a(l)至a(100)中的最大值D、a (2)至a (100)中的最大值29、在Visual Basic中程序段是计算()公式的。s二0For i=l To 10t=lfor j=l to i t=t*j next j s=s+t Next iA、 s=1+2+3+4

14、+5+6+7+8+9+10B、 s=l*2*3*4*5*6*7*8*9*10C、 s=l!+2!+3!+4!+5!+6!+7!+8!+9!+10! D、s=1+2*3+3*4+4*5+5*6+6*7+7*8+8*9+9*1030、阅读下面程序：Private Sub commanditelick()a=valb=valif a=b then=str(a) exit sub end if do while b<>0r=a mod ba=bb 二rloop=str(a)End Sub在textl、text2中输入30、6,则text3中的值为()oA、1 B、3 C、6D、9二、填空题

15、（共40分）31、（本题6分）有以下几种流程图符号：输入输出框连接框流程线判断框处理框开始结束符A、F六种流程图符号代表的含义依次是Zn . j a532、（本题3分）将数学表达 下一+ W 式S二写成VB表达式为33、（本题3分）闰年条件：能被4整除且不能被100整除或能直接被400整除。写出闰年的VB表达式（年份用变量y）一34、（本题2分）有如下Visual Basic程序段：a = "1100101b = Mid （a, 2, 4） + “101该程序段运行后，变量b的值为 035、（本题2分）有如下Visual Basic程序段：a = 5b = Len（“1011） If

16、 a > b Then二请重新输入Else=欢迎光临End If该程序段运行后，在标签Label 1上显示的是36、（本题4分，每空2分）有如下Visual Basic程序段：s = 0 a = 5 For i = 1 To 10 Step 2a = a + i s = a * i Next i问：该程序段运行后，（1）变量i的值是o（2）变量s的值是。37、(本题4分每空2分)有如下Visual Basic程序段：Dim a As Integer, b As Integer, c As Integer a = 20 b = 0 c = 2Do While a > b And a

17、> cb = b + 1 c = c + b Loop问：该程序段运行后，(1)语句“b=b+1”执行的次数为 0(2)变量c的值为 o38、（本题4分，每空2分）有如下流程图结构，该流程图中输出的前2个值依次分别是39、（本题4分，每空2分）设有n盏灯，放在一排。从1到n依次顺序编号。有n个人也从1到n依次编号。第1个人（1号）将灯全部关闭，第2个 人（2号）将凡是2的倍数的灯打开，第3个人（3号）将凡是3的倍数的灯做相反处理（该灯如果为打开的，则将它关闭，如关闭的将它打开），以后的人 和3号一样，将凡是自己号数倍数的灯做相反处理。问当n个人操作后，哪几 盏灯是亮的。(亮灯为0,关闭为

18、1)为了实现这一目标，完善下列程序，使之能完成该功能。Private Sub commandite1ick()Const n=20Dim i as integer, j as integer Dim a(l to n) as integer For j=l to n a(j)=0 next j for i=l to n for j=l to n if j mod i=0 then1End if Next j Next i For j=l to nIf 2 then str (j)Next jEnd Sub 其中填充40、（本题4分，每空2分）普源为晚上的班级联欢会设计了一个抽奖程序，将所有同学

19、的编号和对应的姓名分别保存在数组a （全班共50个同学，编号为1到50）和数组b中，程序会随机产生一个1到50的正整数（同时包括1和 50），作为中奖编号。£晚会抽奖程序口回区编号和姓名抽奖123456789W晨芝玲婵文民仓瞰 赛华兰晓小向小佶小一 陈陆黄方倪郑叶赵王获奖号恭喜郑向文同学-If,程序界面如图所示，左边列表框Listl中显示同学的编号和姓名，单击抽奖 按钮(Command!.),在标签Label3中显示抽中的编号，同时在标签Label4中 显示恭喜*我同学，其中具体同学的姓名从数组b中获取。解决此问题的程序段如下：Dim a(l To 50) As IntegerDim

20、 b(1 To 50) As StringFunction search(m As Integer) As Integer search = 0 For i = 1 To 50If m = a(i) Then search = a(i) End IfNext iEnd FunctionPrivate Sub Commandl_Click() Dim c As Integer,t as integer RandomizeQ)=Str (c) t = search (c) If t <> 0 Then二恭喜 + 同学End IfEnd SubPrivate Sub Form Load(

21、)'此过程用于对数组&和数组b进行初始赋值，代码略End Sub在程序和划线处，填入适当的语句或表达式，把程序补充完整:(1)程序中划线处应填入 O(2)程序中划线处应填入 o41、(本题4分，每空2分)数制转换。将一个K进制(k«10)数x转换成十进 制数可采用如下方法：主要方法是从右向左，依次取数x的各位数字，分别计 算出该数从右边数起的第i位数字与的积，再将其累加，直到所有的数字 取完为止。例如，将五进制数1231转换成十进制数的方法如下：(1231) 5=1 义 50+3 X 542 X52+1X 5s=(191)下列Visual Basic程序的功能是将K进

22、制(k«10)数x转换成十进制数。界面 如图所示，在文本框Textl中输入数制k,在文本框Text2中输入数x,单击“ 转换按钮(Commandl)后，在标签Label4中输出转换的结果。解决此问题的算法流程图如图所示，相应的Visual Basic程序如下：Private Sub Commandl_Click()Dim b As Long, i As Integer, k As Integer, x As Long, t As Integer b = 0： i = 1 k = Vai x = Vai t = x Mod 10Do While 1b =x = x 10t = x Mo

23、d 10 i = i + 1 Loop二Str(k) + 进制数”+ + 转换成十制数为 + Str(b)End Sub在程序和划线处，填入适当的语句或表达式，把程序补充完整:(1)程序中划线处应填入 O(2)程序中划线处应填入。三、附加题(共10分，第一题2分，第二题8分，第二小题代码行数不限)42、把杂乱无章的数据变为有序的数据，这一过程称为排序。冒泡排序是其中一种最基础的排序方法，其中的升序是把数列中把较小的数据逐次向上推 移的一种排序技术。它的方法是把待排序的n个元素的数组看成是垂直堆放的 一列数据，从最下面一个元素起，自下而上的比较相邻两个元素中的数据，如 果较小的数据在下面，那将较

24、小的数据换到上面的元素中（否则不交换）。重 复这一过程，直到处理完最后两个元素中的数据，称为一遍加工，当第1遍加 工完成时，最小的数据已经上升到第1个元素的位置；第2遍加工对余下的n- 1个元素重复上述处理过程，第2遍加工完成后剩下最小的数据上升到第2个 位置；直到n-1遍加工完成后发现数据完成了从小到大的排序。假设有4个数据：27 36 32 18,需要4-1二3遍加工第1遍加工如下:第2遍加工如下：j=4j=3第3遍加工如下：j=4 假设4个数据放在数组d(l), d(2),d(3), d第1遍：比较d(j)、d(j- 1), j=4,3,2,比较3次；第2遍：比较d(j)、 d(j-l),尸4,3,比较2次； 第3遍