2018-2019學(xué)年浙江省名校協(xié)作體高二（上）月考信息技術(shù)試卷（9月份）
發(fā)布：2024/4/20 14:35:0
一、選擇題（本大題共15小題，每小題2分，共30分．在每小題給出的四個(gè)選項(xiàng)中，只有一個(gè)符合題目要求）
-
1．下列有關(guān)信息的說(shuō)法中不正確的是（ ?。?/h2>
組卷：16引用：2難度：0.8 -
2．下列關(guān)于該網(wǎng)頁(yè)描述正確的是（ ）
組卷：2引用：1難度：0.5 -
3．下列有關(guān)信息的說(shuō)法，正確的是（ ）
組卷：14引用：1難度：0.9 -
4．下列應(yīng)用中、體現(xiàn)了人工智能技術(shù)的有（ ）
①使用百度的“識(shí)圖”功能對(duì)上傳的圖片進(jìn)行相似圖片查找
②使用掃描筆內(nèi)置的朗讀功能對(duì)掃描到的中英文進(jìn)行實(shí)時(shí)朗讀
③使用指紋解鎖功能能打開(kāi)手機(jī)
④Word軟件將輸入的“以身做則”自動(dòng)更正為“以身作則”
⑤使用在線二維碼生成器制作二維碼．組卷：6引用：6難度：0.7 -
5．屬于因特網(wǎng)信息資源評(píng)價(jià)方式，但是卻沒(méi)有在下圖中體現(xiàn)的是（ ?。?br />
組卷：9引用：1難度：0.7 -
6．使用Word軟件編輯某文檔，部分界面如圖所示：
下列說(shuō)法正確的是（ ）組卷：8引用：1難度：0.5
二、非選擇題（本大題共5小題，其中第16小題4分，第17小題6分，第18小題3分，第19小題4分，第20小題3分，共20分）
-
19．用VB設(shè)計(jì)一個(gè)模擬選手得分程序，在文本框Text1中輸入裁判人數(shù)（人數(shù)大于2），然后點(diǎn)擊Command1按鈕，在List1中產(chǎn)生70到100的隨機(jī)數(shù)為裁判的打分，去除一個(gè)最高分，去除一個(gè)最低分，取其他裁判打分的平均分作為最終得分顯示在文本框Text2中，運(yùn)行效果如圖所示。
（1）若要在程序運(yùn)行時(shí)，修改窗體顯示的標(biāo)題為“得分計(jì)算”，則下面語(yǔ)句可行的是。
（單選，填字母：A．Command1．Caption=“得分計(jì)算”/B．Form1．Name=“得分計(jì)算”/C．Form1．Text=“得分計(jì)算”/D．Form1．Caption=“得分計(jì)算”）
（2）實(shí)現(xiàn)上述功能的VB程序如下，請(qǐng)?jiān)跈M線處填入合適的代碼。
Private Sub Command1_Click （ ）
Dim n As Integer'裁判人數(shù)
Dim max As Integer,min As Integer,sum As Integer
Dim AveScore As Single'存儲(chǔ)最終得分
n=Val（Text1．Text）：sum=0
If n＜=2Then MsgBox （“輸入數(shù)據(jù)要大于2，請(qǐng)重新輸入！“）
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）若要將最終得分保留一位小數(shù)（四舍五入），下列代碼可行的是。
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．編寫一個(gè)VB程序，判斷某字符串是否為回文字符串。所謂回文字符串，指一個(gè)字符串從左往右讀和從右往左讀是完全一樣的。程序運(yùn)行時(shí)，單擊“判斷”按鈕后，在標(biāo)簽Label2中顯示判斷結(jié)果。程序運(yùn)行效果如圖所示。
實(shí)現(xiàn)上述功能的程序如下，請(qǐng)回答下列問(wèn)題：
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循環(huán)
End If
i=i+1
Loop
If flag Then
Label2．Caption=s+“是回文字符串“
Else
Label2．Caption=s+“不是回文字符串“
End If
End Sub
（1）當(dāng)前代碼的事件處理過(guò)程名為。
（2）為使程序完成相應(yīng)功能
下劃線①處應(yīng)填入代碼。
下劃線②處應(yīng)填入代碼。組卷：2引用：1難度：0.4