浙江省嘉兴市、丽水市2017-2018学年选考信息技术教学测试试卷（3月）_试卷库

浙江省嘉兴市、丽水市2017-2018学年选考信息技术教学测试试卷（3月）

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

一、选择题（共12小题）

1、关于信息及安全，下列说法中正确的是（）

A . 拍摄一张照片，这张照片即为信息 B . 信息的表示、存储必须依附于载体，信息的传播则不需要载体 C . 网络支付密码应尽量简单 D . 信息可重复使用而不会产生损耗

2、关于网页与网络应用术语缩写，下列说法不正确的是（）

A . WWW是互联网的英文缩写，是提供WEB页访问、浏览的一项服务 B . HTML是一种超文本标记语言，其源代码由网页浏览器解释执行 C . SMTP协议用于把电子邮件送到收件人的电子邮件服务器中 D . HTTP协议用于浏览器与WEB服务器之间的信息传输

3、使用word软件编辑某文档，部分界面如图所示。

下列说法正确的是（）

A . 修订前，第一行文字为“自古以来，人类地生存与信息有着不解之缘。” B . 接受所有修订后，第一行文字为“自古以来，人类地生存和发展与信息有着不解之缘。” C . 文中2个加点的“地”可通过自动更正功能改为“的” D . 删除文中的“每时每刻”，批注内容不会被删除

4、使用Access软件打开数据库，部分界面如图所示。

下列说法正确的是（）

A . 当前视图下不能对“课程名称”字段名进行修改 B . “课程编号”字段数据类型为自动编号 C . 当前打开的数据表共有8条记录，删除记录后无法撤销 D . 删除“课程类别”字段会使记录数减少

5、某算法流程图如图所示，执行这部分流程后，变量s的值是（）

A .

B .

C .

D .

6、已知字母“i”的ASCIl码值为69H，则字母“m”的ASCII码值是（）

A . 73H B . 1001011B C . 73D D . 1101101B

7、使用GoldWave软件编辑某音频文件，部分界面如图所示。

下列说法正确是（）

A . 该音频是双声道的MP3格式文件 B . 该音频左声道的前1秒设置了静音效果，后1秒设置了淡出效果 C . 该音频每秒采样44 100次，每个采样点数据以2个字节进行存储 D . 当前状态下执行“剪裁”命令，保持其他参数不变，存储容量变为原来的3／5

8、使用Photoshop软件处理“端午节．psd”文件，部分界面如图所示。

下列说法正确的是（）

A . 交换“圆月”和“粽子”图层顺序，不会影响图像画面效果 B . 利用文字工具修改“棕”图层文字大小时，“诗”图层中文字的大小一起改变 C . “背景2”图层的图层蒙板效果不可见 D . 当前状态下，可以直接对“圆月”图层设置图层样式

9、利用Flash软件制作“播放”按钮，部分界面如图所示。

下列说法正确的是（）

A . 将该按钮添加到舞台，测试影片时，按下鼠标时播放声音 B . “音效”图层指针经过帧中声音同步方式设置为“数据流”较为合适 C . 当前状态下，可以复制“文字”图层弹起帧的内容 D . 在“音效”图层的点击帧处执行“插入帧”操作之后，该按钮将不可用

10、【加试题】使用Photoshop软件新建一个图像文件，相关参数设置如图所示。

制作完成后分别以a. bmp和b. jpg保存，已知b. jpg文件容量为236 KB，则图像文件a. bmp与b. jpg的压缩比约为（）

A . 2：1 B . 4：1 C . 6：1 D . 16：1

11、【加试题】某同学用VB编写如下程序：

Private Sub Command1_Click()

Dim k As Integer，a As Integer，b As Integer

a=Val(Text1．Text)

b=Val(Text2．Text)

Label1．Caption=trans(a，b)

End Sub

Function trans(m As Integer，n As Integer)As String

If m<>0 Then

r=m Mod n

trans=trans(m＼n，n)+Str(r)

Else

trans=0

End If

End Function

程序运行时，在文本框Text1和Text2中分别输入11和2，则Label1中的输出结果是（）

A . 01011 B . 1011 C . 01101 D . 11010

12、【加试题】有如下VB程序段：

Key=Val(Text1．Text)

i=1：j=10

flag=False

s=””

Do While i<一i And NOt flag

mid1=Int(i+(j-i)／3)

mid2=Int(j-(i-i)／3)

If Key=a(mid1)Then

flag=True

ElseIf Key<a(mid1) Then

j=mid1-1

ElseIf Key=a(mid2) Then

flag=True

ElseIf Key>a(mid2) Then

j=mid2+1

Else

i=mid1+1

i=mid2-1

End If

s=s&” ”＆ mid1 ＆ “：”& mid2

Loop

Text2．Text=s

已知数组a(1 To 10)中的数据分别是12，21，34．45，59，63，72，86，94，100，在文本框Text1中输入34，程序运行后文本框Text2中显示的内容是（）

A . 4：7 1：2 B . 4：7 1：2 3：3 C . 4：7 1：3 3：3 D . 4：7 3：3

二、非选择题（共5小题）

1、小李收集了2017年第四季度浙江省各地区工业用电情况数据，并使用Excel软件进行数据处理，如图a所示。

请回答下列问题：

(1)计算12月份环比数据，可以先复制G5单元格，以公式粘贴方式粘贴到15单元格，然后通过15单元格对区域16：115自动填充，则l15单元格中的公式是。

(2)选中图a中的A5：Jl5区域，按“季度总计”降序排列，则排序的主要关键字应为。

(3)根据图a中的数据制作的图表b所示，创建该图表的数据区域是。

(4)对图a中的11月用电量和12月用电量数据进行筛选操作，筛选设置都如图c所示，则按此设置筛选出的地区有个。

2、编写一个VB程序，实现如下功能：在文本框Text1中输入一串小写的英文字母，单击“统计”按钮Command1,在文本框Text2中输入字母升序段个数，要求每个升序段中字母数量必须超过3个（如输入abctsefefghk，则满足条件的升序段序列abct，efghk，个数为2），程序运行界面如图所示。

(1)该程序界面上共有个类。（填数字）

(2)为实现上述功能，请在画线填入合适的代码。

Private Sub Command1_Click()

Dim s As String

Dim m As Integer，n As Integer，k As Integer，t As Integer，i As Integer

s=Text1.Text

n=Len(s)

k=1：m=0：t=0

For i=2 To n

If Mid(s，i，1)> ① Then

k=k+1

t=0

Else

t=1

End If

If k>3 And( ② )Then

m=m+1

k=1

End If

Next i

Text2.Text=Str(m)

End Sub

① ②

(3)若文本框Text1中输入内容abgcdefkuvghl，单击“统计”授钮后，本文框Text2中显示的内容是。

3、李制作主题为“奔马”的输入作品，首先使用Photoshop软件处理图片，然后使用Flash软件制作动画。请回答下列问题：

(1)如图a所示，当前状态下，能直接添加滤镜的图层是（多选，填字母：A，文字／B，小鸟／C，燕子／D，奔马／E，背景)。

(2)“奔马”图层第1帧至第60帧的幂补间动画如图b所示，则该动画的补间类型 (填字母：A，形状补间／B，动画补间)。

(3)测试场景时，发现燕子动画一开始就出现了，当前状态下若要使燕子动画推迟1秒出现，正确的操作是。

(4)“音乐”图层的声音时长为12s，同步为“事件”，若要实现动画和声音在最后一帧同时停止，可在图层的最后一帧添加动作脚本：。

(5)将该作品按图c设置发布，则生成的文件都具有交互功能吗? （填：是/否）

4、【加试题】随机产生一个存有两位整数组a，先排序，然后进行数据重组，使被排序的数据呈现中间小，并逐次向两边增大。小李编写了该VB程序，运行程序时，在列表框List1中显示排序前数据，单击“重组”按钮Command2，在列表框List2中显示“重组”后的数据，程序运行界面如图所示。

实现上述功能的VB程序如下，但加框处代码有错，请改正。

Dim a(0 To 20)As Integer，d(0 To 20)As Integer

Dim n As Integer

Private Sub Command1_Click()

‘产生n个[10，99]之间的随机整数，存储在a(0 To n-1)中，同时显示在List1中，代码略

End Sub

Private Sub Command2_Click()

Dim i As Integer

n=Val(Text1．Text)

For i=0 To n-2

For j=i+1 To n-1

If Then ‘(1)

temp=a(i)：a(i)=a(j)：a(j)=temp

End If

Next j

Next i

If n Mod 2<>0 Then d(n＼2)=a(n-1) ‘个数为奇数，最小值放中间位置

For i=0 To n＼2—1

d(i)=a(i*2)

=a(2*i+1) ‘(2)

Next i

‘在列表框List2中输出数组d，代码略

End Sub

(1)处加框代码应改为；

(2)处加框代码应改为。

5、【加试题】维吉尼亚（Vigenere）密码。如图所示，分别用行和列表示待加密的字符（明文）和当前字符的密钥，行和列的交叉点的字符即为加密后的结果（密文）。在加密时．密文与明文的字母大小写形式保持一致，如，明文字母为大写，则加密后的密文字母也为大写；当密钥长度不足时重复使用密钥。例如：当明文M=HellowWorld，密钥K=abc时，密文C=HfnplpYosnd。运算过程如下所示：

明文：HelloWorld

密钥：abcabcabca

密文：HfnlpYosnd

依据上述算法描述设计了如下VB程序。请回答下列问题：

(1)若明文是Jia，密钥是Pass，则输出的密文是。

(2)请在画线处填上合适的代码。

Const MIN_ASC=65 ‘字母”A”的ASCII值

Function x2D(x As String)As String ‘字符串小写转成大写

Dim s As String，zf As String，i As Integer

S=””

For i=1 To Len(x)

zf=Mid(x，i，1)

If zf>=“a”And zf<=“z”Then

s=s+ ①

Else

s=s+ zf

End If

X2D=s

End Function

Private Sub Command1_Click()

Dim M As String，K As String，C As String，flag As Boolean

Dim i As Integer，t As Integer，ch As Integer，pos As Integer·

As Integer

M=Textl．Text ‘明文

K=Text2．Text ‘密钥

t=Len(K)

K=X2D(K) ‘将密钥全部转成大写

C=“ ” ‘加密后的结果

For i=1 To Len(M)

ch=Asc(Mid(M，i，1))

flag=False

If ch>=97 And ch<=122 Then ch=ch-32：flag=True

pos= ② ‘密钥的字符位置值

If pos=0 Then pos=t

j=Asc(Mid(K，pos，1)) ‘密钥字符的ASCII值

ch=ch-MIN_ASC

j=j-MIN_ASC

ch= ③

ch=ch+MIN_ASC

If flag Then ch=ch+32 ‘设置字母的大小写形式

C=C & Chr(ch)

Next i

Text3．Text=C

End Sub

① ② ③