2017-2018学年浙江省绍兴市柯桥区高三（上）期末信息技术试卷
发布：2024/10/26 0:0:2
一、选择题（本大题共12小题，每小题2分，共24分．在每小题给出的四个选项中，只有一个符合题目要求）
-
1．关于信息与信息安全，下列做法正确的是（ ）
组卷：32引用：1难度：0.9 -
2．下列软件，不能用于编辑网页的是（ ）
组卷：17引用：1难度：0.9 -
3．下列应用中，体现了人工智能技术的有（ ）
①支付宝用户通过刷脸登录账户
②在微信朋友圈发布自己旅途照片
③DeepMind 公司的 AlphaGo 程序战胜世界围棋冠军柯洁
④自动喷淋系统检测到发生火灾，自动打开喷头喷水灭火并发出报警信号
⑤通过清华紫光 OCR 软件识别杂志扫描图片中的文字，并保存为文本文件组卷：21引用：1难度：0.9 -
4．使用 UltraEdit 软件观察字符“加油，2017！”的内码，部分界面如图所示。 下列说法正确的是（ ）
组卷：12引用：1难度：0.7 -
5．关于 Access 数据库，下列说法正确的是（ ）
组卷：17引用：2难度：0.5
二、非选择题（本大题共5小题，其中第13小题4分，第14小题5分，第15小题8分，第16小题3分，第17小题6分，共26分）
-
16．小张编写一个 VB 程序实现以下功能：随机产生 10 个 1 到 20 之间的不重复的 整数，在列表框 list1 中显示（存储在数组 a 中），单击“排序”按钮 Command1，在列表框 list2 中显示升序排序后结果。程序运行界面如图所示。
实现上述功能的 VB 程序如下，但加框处代码有错，请改正。
Const n=10
Dim a（1To n） As Integer Private Sub Form_Load （ ） Dim i As Integer,j As Integer Randomize
a（1）=Int（Rnd*20）+1i=2
Do While i＜=n
a（i）=Int（Rnd*20）+1
For j=1To i-1
If a（j）=a（i）
（1）
Next j
i=i+1
Loop
For i=1To n
List1．AddItem Str（i）+““+Str（a（i）） Next i
End Sub
Private Sub Command1_ClickDim i As Integer,j As Integer For i=1To n-1
For j=n To i+1Step-1
If
Then（2）
a（j）=a（j）+a（j-1）：a（j-1）=a（j）-a（j-1）：a（j）=a（j）-a（j-1）End If
Next j
Next i
For i=1To n
List2．AddItem Str（i）+““+Str（a（i）） Next i
End Sub组卷：3引用：1难度：0.5 -
17．用 VB 编写的英文单词字频统计程序如第 17 题图所示，在文本框 Text1 中 输入文章，单击“统计”按钮 Command1，在列表框 List1 输出单词与频次，在标签 Label2 中输出频次最高的单词，如频次最高的单词有多个，则输出时用逗号分隔。算法如下：
（1）将文本框 Text1 中的文章保存到字符串变量 s 中。
（2）从左往右扫描字符串 s,用字符串 word 存储文章中依次出现的单词，将新出现的单 词自动加入单词队列 dic（i）中，单词出现的频次记录到对应的 num（i）中。如下方法扫描：
①从左往右扫描，当扫描到第 i 个字符时，如果是字母，继续扫描，否则，跳转到②，直 至扫描结束；
②将 b 到 i-1 组成一个单词 word,查询单词字典 dic 判断是否存在，如果不存在，将新 单词插入单词字字典尾部 dic（k），并且记录单词频次 num（k）为 1，如果 dic 字典中存在单词 word,那么该单词对应频次增加 1，再跳转到①。
（3）在列表框 List1 中依次输出单词与频次，在标签 Label2 中输出频次最高的单词。
（1）实现上述功能的 VB 程序如下，请在横线处填入合适的代码。
Private Sub Command1_Click （ ）
Dim dic（1To 10000）As String‘存储自建单词字典
Dim num（1To 10000）As Integer'存储单词出现的频次
Dim word As String'存储每次扫描的单词
Dim c As String,s As String
Dim i As Integer,j As Integer,di As Integer,k As Integer
Dim b As Integer,slen As Integer
Dim nummax As Integer'记录最高单词频次
Dim result As String'存储出现频率最高的单词串
s=Text1．Text slen=Len（s）
j=0'存储每个单词的长度
k=1'k-1 为当前单词字典长度
b=1'存储每个单词的起始位置
nummax=0
For i=1To 10000’初始化单词字典频次
num（i）=0
Next i i=1
Do While i＜=slen c=Mid（s,i,1）
If c＞=“a“And c＜=“z“Or c＞=“A“And c＜=“Z“Then j=j+1
Else
If j＜＞0Then
word=LCase（ ①）‘将单词统一为小写’
di=1
Do While word＜＞dic（di） And di＜k di=di+1
Loop
If di=k Then‘单词字典插入新单词
dic（k）=word num（k）=1
k=k+1
Else
②‘单词在单词字典中已存在，对应频次加 1’End If
If num（di）＞nummax Then nummax=num（di）
j=0
End If
b=i+1
End If
i=i+1
Loop result=““
For j=1To k-1
List1．AddItem dic（j）+““+Str（num（j）） If ③Then
If result=““Then
result=result+dic（j） Else
result=result+“，“+dic（j）'如出现频率最高的单词有多个，则用逗号分隔
End If
End If
Next j
Label2．Caption=“出现频率最高的单词是：“+result
End Sub
（2）根据本题算法，如第 17 题图所示，若在 Text1 中将文章最后一行“strength you will。”
改为“strength you will3”，单词统计结果（选填：会/不会）产生变化。组卷：2引用：1难度：0.3
