浙江省诸暨市2020届高三上学期信息技术诊断性考试试卷_试卷库

浙江省诸暨市2020届高三上学期信息技术诊断性考试试卷

年级：学科：信息技术（信息科技）类型：月考试卷来源：91题库

一、选择题(本大题共12小题，每小题2分，共24分。每小题列出的四个备选项中只有一个是符合题目要求的，不选、多选、错选均不得分) （共12小题）

1、下列有关信息与信息技术的说法，正确的是（）

A . 书籍、广播、电视是常见的信息表达方式 B . 文本、图像、声音、动画、视频均可以作为信息的载体 C . 不联网的计算机没有信息安全隐患，故不需要对数据进行备份 D . 安装并及时更新杀毒软件的计算机可以防御所有计算机病毒

2、下列有关网页和电子邮件的说法，正确的是（）

A . HTTP协议用于浏览器与Web服务器之间的信息传输 B . 执行“添加到收藏夹”，实际是保存了当前网页的内容 C . 发送电子邮件时，邮件主题和正文内容缺失将导致邮件发送失败 D . 通过网页收发电子邮件不需要使用SMTP和POP3协议

3、下列关于Access数据库和数据表的说法，正确的是（）

A . 在数据表视图下，不能修改字段名称和数据类型 B . 新建“自动编号”类型的字段后，原有记录的“自动编号”字段值缺失 C . 数据表中某字段数据类型为“是/否”，可以输入“是”作为有效字段值 D . Access数据表的数据导出到Excel后，Excel中显示的字段值可能发生变化

4、使用UltraEdit软件观察字符“字母a～z”内码，部分界面如图所示.

下列说法正确的是（）

A . 图中共有3个ASCII码字符 B . 字符“j”的十六进制编码值为70 C . 字符“z”内码值的十进制表示为122 D . 字符“母”内码值的二进制表示为“1100010010101000”

5、使用photoshop软件制作作品，部分界面如图所示。

下列说法正确的是（）

A . 可以直接使用油漆桶工具修改“放飞梦想”图层中的文字颜色 B . 使用移动工具移动“飞机”图层中飞机图像位置，文字“放飞梦想”不受影响 C . “风车”图层被锁定，故不能移动“风车”图层至“飞机”图层上方 D . 隐藏“背景”图层，该作品呈现效果不会变化

6、一段1024×768像素、24位色、NTSC制式(30帧/秒)的无声AVI格式视频文件，经压缩比为10：1的技术压缩后其容量为675MB，时长约为（）

A . 10秒 B . 50秒 C . 100秒 D . 150秒

7、某算法的部分流程图如图所示。

执行这部分流程，输出s的值是（）

A . －10 B . 10 C . 190 D . 210

8、下列VB表达式的值等于35的是（）

A . Abs(Int(-34.3)) B . Val(Str(30)+"5") C . Len("xue")+5 D . Int(sqr(50))*11\2

9、有如下VB程序段：

Private Sub Command1_Click()

Dim d(1 To 8) As Integer

Dim i As Integer, s As Integer

d(1)=1

For i=2 To 10

d(i)=d(i-1)*i

Next i

For i=1 To 5

s=s+d(i)

Next i

Text1.Text = Str(s)

End Sub

程序运行时，单击命令按钮Command1后，将会出现的提示信息是（）

A . 溢出 B . 下标越界 C . 要求对象 D . 无效的过程调用或参数

10、有如下VB程序段：

Dim a(1 To 10) As Integer

a(1)=2: a(2)=18: a(3)=10: a(4)=34: a(5)=16

a(6)=7: a(7)=37: a(8)=6: a(9)=15: a(10)=15

c=0: x=0: t= 1

For i=1 To 10

a(i)=a(i)*t

c=c+a(i)

If c>0 Then x=x+1

t=-t

Next i

Text1.Text=Str(x)

则程序运行后Text1中显示（）

A . 1 B . 3 C . 5 D . 10

11、有如下VB程序段：

For i=1 To 8

d(i)= In(Rnd*10)

Next i

For i= 2 To 8

If i Mod 2=0 And d(i)> d(i-1)Then

d(i)=d(i-1)+1

ElseIf i Mod 2= 1 Then

If d(i)>d(i-2) Then

t=d(i): d(i)=d(i-2): d(i-2)=t

End If

Next i（）

A . 8 8 7 1 3 5 0 1 B . 9 0 8 3 5 6 0 1 C . 6 2 5 4 7 8 2 3 D . 9 10 6 7 5 3 2 2

12、以下VB程序段用以实现10个数组元素升序排序。

Dim a(1 To 10) As Integer

Dim flag As Boolean

Dim i As Integer, j As Integer, tmp As Integer

随机生成10个不重复的数据存入数组A中，代码略

For i=2To 10

tmp= a(i)

j=i

flag=False

Do While ① And Not flag

a(j)=a(j-1)

j=j-1

②

Loop

a(j)=tmp

Next i

要实现上述功能，方框①②中的语句分别是（）

A . ①tmp<a(j-1) ②If j=1 Then flag=True B . ①tmp>a(j-1) ②If j=1 Then flag=True C . ①tmp<a(j) ②If j=0 Then flag=True D . ①tmp>a(j) ②If j=0 Then flag=True

二、非选择题(本大题共5小题，4+8+7+7，共26分) （共4小题）

1、小段收集了2018年浙江省各地区农业总产值相关数据，并使用Excel软件进行数据处理，如第图a所示，其他单元格中均无数据。

(1)区域G3：G14的数据是通过公式计算得到的：先在G3单元格中输入公式，再利用自动填充功能完成区域G4：G14的计算。G3单元格中的公式可能是 (多选，填字母)。 (1)

A . =F3/F14*100 B . =F3/$F$14*100 C . =F3/F$14*100 D . =F3/$F14*100 E . =F3/SUM($F$3：$F$13)*100

(2)根据第图a中的相关数据制作了图表，如图b所示，创建该图表的数据区域是。

(3)将区域A2：F13的数据复制到新工作表，在新工作表中对数据进行筛选操作，筛选设置如图第图c所示，则按此设置筛选出的地区有个。

2、小段使用Flash软件创作主题为“旋转的风车”的多媒体作品，部分界面如图a所示。

图 a

请回答下列问题：

(1)编写脚本是设计多媒体作品的重头戏，脚本编写的一般步骤有：①编写脚本大纲②媒体元素分解③编写文字脚本④编写制作脚本，则正确的脚本编写顺序为 (单选，填字母：A .①②④③ B .②①③④ C .①④③② D .①③④②)。

(2)图中“文字”图层第1帧到第36帧实现了文字“放飞梦想”渐变为“超越自我”的动画，则第36帧中的“超越自我”为 (填文字：形状/实例)。

(3)如图所示，在不影响其他动画效果的前提下，为使“音乐”图层中的声音从本场景第1帧开始播放，正确的操作是。

(4)图中“风车”图层应用了影片剪辑元件“风车”，修改“风车”元件的帧频为6fps，则当前场景的播放速度 (填文字：变快/变慢/不变)。

(5)“播放”按钮的编辑界面如图b所示，该按钮 (填文字：能/不能)正常响应鼠标事件。

图 b

(6)测试影片时，单击“播放”按钮，停止所有声音的播放，并使影片跳转到“scene2”场景的第1帧并继续播放，则“播放”按钮的动作脚本为。

3、数组元素a(1)～a(100)用以存储某班级50位学生的信息技术和通用技术成绩，奇数位置存储信息技术成绩，偶数位置存储对应学生的通用技术成绩。该数组已经按照两科总成绩升序排序。依据对分查找思想，设计一个在数组a中查找总成绩为key的程序，统计输出两科总成绩大于等于key的人数。部分运行界面如图所示：

实现该功能的VB程序如下：

Private Sub Command1_Click()

Dim a(1 To 100) As Integer

Dim sum As Intcger

Const t= 50

‘将50个学生的信息技术和通用技术成绩依次存储在数组a(1)~a(100)，代码略

Key = Val(Text2.Text)

i= 1

j= 100

m=(i+j)\2

Do While ① And m>1

If m Mod 2=1 Then m= m- 1

sum = a(m)+ a(m- 1)

If ② Then

j=m-2

Else

End If

m=(i+j)\2

Loop

Label2.Caption "大于等于"& Key & "分的人数为: "+ Str(t-j\2)

End Sub

(1)代码"Private Sub Command1_Click()"中的Command1_Click()是 (单选，填字母：A .对象名/B .属性名/C .事件名/D .事件处理过程明)。

(2)请在①②划线处填入合适代码。

① ②

(3)加框出代码有错，请改正。

4、二叉树是每个结点最多有两个子树的树结构，如值为9的结点有两个子树6和8，值为6的结点有两个子树5和3。若设二叉树的深度为h，则除第h层外，其它各层(1～h－1)的结点数都达到最大个数，第h层所有的结点都连续集中在最左边，这就是完全二叉树。现要构造大根堆，堆是一棵顺序存储的完全二叉树，大根堆又是一种特殊的堆，它的特征是每个双亲结点的值都不小于其孩子结点的值。如下图所示，值为9的结点是6和8的双亲结点，而6和8分别是9的左孩子和右孩子；同理，6是5和3的双亲结点，而5和3分别是6的左孩子和右孩子……

假如我们用数组表示上述大根堆：

a(1)	a(2)	a(3)	a(4)	a(5)	a(6)	a(7)	a(8)	a(9)
9	6	8	5	3	4	7	2	1

现有一算法把一个无序数组改造成大根堆。例如：我们在上图的大根堆中再增加一个值为8的新元素，如下图所示。

数组存储为：

a(2)	a(3)	a(4)	a(5)	a(6)	a(7)	a(8)	a(9)	a(10)
6	8	5	3	4	7	2	1	8

具体操作方法如下：

第一步：因为a(10)大于它的双亲结点a(5)，故需交换a(10)和a(5)的值；

数组存储为：

第二步：因为a(5)大于它的双亲结点a(2)，故需交换a(5)和a(2)(t)值；

数组存储为：

a(1)	a(2)	a(3)	a(4)	a(5)	a(6)	a(7)	a(8)	a(9)	a(10)
9	8	8	5	6	4	7	2	1	3

第3步：因为a(2)不大于它的双亲结点a(1)，故无需做交换操作。此时新元素已经放到了正确的位置，新的大根堆构造完成，上移行动结束。

(1)若在图中增加值为4的新元素，则元素4将被存储在数组元素中。

(2)小段为此编制一VB程序：在文本框Tcxt1中输入结点个数n，单击命令按钮Command1，随机产生n个[1，99]的整数作为结点值，并由此构造大根堆，结果显示在列表框List1中，程序运行界面如图所示。

实现上述功能的程序代码如下请在划线处填入合适的代码。

Dim a(1 To 100) As Integer

‘该函数功能为实现数据的对齐输出

Function pout(x As Integer, y As Integer) As String

代码略

End Function

Private Sub Command1_Click()

Dim tmp As Integer, Dim m As Integer

Dim n As Integer, Dim s As String

n = Val(Text1.Text)

For i=1 To n

a(i) = Int(Rnd()*99)+ 1

Next i

For i= 2 To n

p=i

f=p\2

Do While ①

tmp = a(p): a(p)= a(f): a(f) = tmp

p=f

f=p\2

If f= 0 Then Exit Do

Loop

Next i

k= n

Do While k >=1

m=m+1

②

Loop

k= 1

For i=0 To m- 1

s=""

For j= 1 To ③

If k> n Then Exit For

s=s+ pout(a(k), (2^(m-1)-2^i)/2^i)

k=k+ 1

Next j

List1.AddItem s

Next i

① ② ③