2018-2019学年浙江省名校协作体高二（上）月考信息技术试卷（9月份）
发布：2024/4/20 14:35:0
一、选择题（本大题共15小题，每小题2分，共30分．在每小题给出的四个选项中，只有一个符合题目要求）
-
1．下列有关信息的说法中不正确的是（ ）
组卷：16引用：2难度：0.8 -
2．下列关于该网页描述正确的是（ ）
组卷：2引用：2难度：0.5 -
3．下列有关信息的说法，正确的是（ ）
组卷：14引用：1难度：0.9 -
4．下列应用中、体现了人工智能技术的有（ ）
①使用百度的“识图”功能对上传的图片进行相似图片查找
②使用扫描笔内置的朗读功能对扫描到的中英文进行实时朗读
③使用指纹解锁功能能打开手机
④Word软件将输入的“以身做则”自动更正为“以身作则”
⑤使用在线二维码生成器制作二维码．组卷：6引用：6难度：0.7 -
5．属于因特网信息资源评价方式，但是却没有在下图中体现的是（ ）
组卷：9引用：1难度：0.7 -
6．使用Word软件编辑某文档，部分界面如图所示：
下列说法正确的是（ ）组卷：8引用：1难度：0.5
二、非选择题（本大题共5小题，其中第16小题4分，第17小题6分，第18小题3分，第19小题4分，第20小题3分，共20分）
-
19．用VB设计一个模拟选手得分程序，在文本框Text1中输入裁判人数（人数大于2），然后点击Command1按钮，在List1中产生70到100的随机数为裁判的打分，去除一个最高分，去除一个最低分，取其他裁判打分的平均分作为最终得分显示在文本框Text2中，运行效果如图所示。
（1）若要在程序运行时，修改窗体显示的标题为“得分计算”，则下面语句可行的是。
（单选，填字母：A．Command1．Caption=“得分计算”/B．Form1．Name=“得分计算”/C．Form1．Text=“得分计算”/D．Form1．Caption=“得分计算”）
（2）实现上述功能的VB程序如下，请在横线处填入合适的代码。
Private Sub Command1_Click （ ）
Dim n As Integer'裁判人数
Dim max As Integer,min As Integer,sum As Integer
Dim AveScore As Single'存储最终得分
n=Val（Text1．Text）：sum=0
If n＜=2Then MsgBox （“输入数据要大于2，请重新输入！“）
If n＞2Then
List1．Clear
Randomize
score=Int（Rnd*31）+70
List1．AddItem Str（score）
'①
max=score
min=score
For i=2To n
score=Int（Rnd （ ）*31）+70
List1．AddItem Str（score）
If score＞max Then max=score
If score＜min Then min=score
sum=sum+score
Next i
AveScore='②
Text2．Text=Str（AveScore）
End If
End Sub
（3）若要将最终得分保留一位小数（四舍五入），下列代码可行的是。
A．AveScore=int（AveScore+0.5）
B．AveScore=int（AveScore*10+0.5）/10
C．AveScore=int（AveScore*100+0.5）/100组卷：2引用：1难度：0.4 -
20．编写一个VB程序，判断某字符串是否为回文字符串。所谓回文字符串，指一个字符串从左往右读和从右往左读是完全一样的。程序运行时，单击“判断”按钮后，在标签Label2中显示判断结果。程序运行效果如图所示。
实现上述功能的程序如下，请回答下列问题：
Private Sub Com1_Click （ ）
Dim s As String
Dim flag As Boolean
Dim n As Integer,i As Integer
s=Text1．Text’①
flag=True
i=1
Do While i＜=n\2
If Mid（s,i,1）＜＞Then’②
flag=False
Exit Do'退出Do循环
End If
i=i+1
Loop
If flag Then
Label2．Caption=s+“是回文字符串“
Else
Label2．Caption=s+“不是回文字符串“
End If
End Sub
（1）当前代码的事件处理过程名为。
（2）为使程序完成相应功能
下划线①处应填入代码。
下划线②处应填入代码。组卷：2引用：1难度：0.4
