会考信息技术试题十套Word

2008年6月高中信息技术会考参考答案

算法与程序设计题（第一套）

一、选择题（本题有 14 小题，每小题 3 分，共 42 分。选出各题中一个符合题意的正确选项，不选、多选、错选均不给分。）

1．李明五一要外出旅游，他在报纸上看到未来十天是阴雨天气，于是就带了雨具，可是直到他回到家也没有下过雨。当他又拿起那张报纸才发现是去年的报纸。就信息的特征来说，李明忽略了信息特征的（）

（A）载体依附性（B）时效性（C）价值性（D）共享性

2．二进制数(111)2转换成十进制数是（）

（A）5 （B）6 （C）7 （D）111

3．有一个网页文件包含下列元素：①文字②图片③链接④音频，将该网页以“文本文件”类型保存到本地磁盘，则保存下来的文件内容包含（）

（A）①（B）①②（C）①②③（D）①②③④

4．Access 数据表中的每一行数据称作（）

（A）一条记录（B）一个字段（C）一条备注（D）一个属性

5．秦始皇统一六国后，就在全国统一了文字和度量衡，目的是促使信息表达的（）（A）自由化（B）通俗化（C）数字化（D）规范化

6．用来描述网页文档结构的语言是（）

（A）QBASIC 语言（B）HTML 语言

（C）Visual Basic 语言（D）Pascal 语言

7．关于算法，下列叙述正确的是（）

（A）算法可以用自然语言、流程图和伪代码来描述

（B）算法只能用流程图来描述

（C）算法不能用伪代码来描述

（D）算法不可以用自然语言来描述

8．依照中华人民共和国《机动车驾驶员驾车时血液中酒精含量规定》，血液中酒精含量大于或等于0.3mg/ml 驾驶机动车的属“酒后”驾车；大于或等于 1.0mg/ml 驾驶机动车的属“醉酒”驾车。如果要根据血液中的酒精含量确定属于“酒后”驾车还是“醉酒”驾车，用算法描述这一过程，合适的算法结构是（）

（A）顺序模式（B）选择模式（C）循环模式（D）树型模式

9．下列属于 Visual Basic 字符串常量的是（）

（A）1/2 （B）Int(3.4) （C）"1/2" （D）1+2

10．在 Visual Basic 中，将数字字串转换为数值的函数是（）

（A）Str(x)（B）Val(x)（C）Abs(x) （D）Int(x)

11．在 Visual Basic 工程设计中，双击窗体中的对象后，出现的是（）

（A）工程窗口（B）工具箱（C）代码窗口（D）属性窗口

12. 下列属于正确的 Visual Basic 赋值语句的是（）

（A） x+y=10 （B） x+y-10=0 （C） x,y=10 （D） x=10-y

13. 圆周长的计算公式为 L=2πa，其中 a 为圆半径。在 Visual Basic 中，能正确表示 2πa 的表达式是（）

（A）2πa （B）2*π*a （C）2·π·a （D）2*3.1416*a

14．在 Visual Basic 中，若 x=3.1415926，则表达式 Int(x*100+0.5)/100 的值是（）（A） 3.14 （B） 3.146 （C） 314 （D） 314.6

四、程序设计题（本题有 4 小题，第 1－3 小题，每小题 4 分，第 4 小题 6 分，共 18 分）

1.有如下 Visual Basic 程序段：

a = 30

b = 20

a = b

该程序段运行后，变量 a 的值为__20______。

2.有如下 Visual Basic 程序段：

Dim a As Single, py As String

a=Val(Text1.Text)

If a>0 Then py="正数"

If a=0 Then py="零"

If a<0 Then py= "负数"

Label1.Caption=py

在文本框Text1 中输入 100，则在Label1 标签上显示的是正数。

3. 以下 Visual Basic 程序的功能是：计算表达式 1×2×3×4×5×6×7×8×9×10 的值，并在文本框 Text1 中输出结果。为了实现这一功能，程序中划线处的语句应更正为______ sum = 1

Private Sub Command1_Click()

Dim i As Integer, sum As Long

sum = 0

For i = 1 To 10

sum = sum * i

Next i

Text1.Text=Str(sum)

End Sub

4.从改革开放以来，浙江省农村家庭的可支配收入逐年增加，近几年每年增长率在 9%左右。小明一家今年的可支配收入是 32000 元，按现在的增长率 9%计算，小明家几年后可支配收入将达到 50000 元？

解决此问题的流程图如 VB-1 所示。根据流程图 VB-1 编写的 Visual Basic 程序如下，在

①和②划线处，填入合适的语句或表达式，把程序补充完整。Private Sub Command1_Click()

Dim x As Long, p As Double

Dim n As Integer

x = 32000

p = 0.09

n = 0

Do While ①

x = x * (1 + p)

②

Loop

Text1.Text = Str(n)

End Sub

程序中划线处①应填入x<50000

程序中划线处②应填入n=n+1