2020-2021學(xué)年浙江省麗水市五校高中發(fā)展共同體高二(上)段考信息技術(shù)試卷(10月份)
發(fā)布:2024/4/20 14:35:0
一、選擇題(本大題共14小題,每小題2分,共28分。)
-
1.下列有關(guān)信息和信息技術(shù)的描述,正確的是( ?。?/h2>
組卷:15引用:4難度:0.7 -
2.小明用E瀏覽器瀏覽一個(gè)圖文并茂的網(wǎng)頁(yè),地址欄信息為“https://www.zjzs.jye.ai/moban/index.jye.ai”,以下說(shuō)法不正確的是( ?。?/h2>
組卷:19引用:2難度:0.5 -
3.“智慧學(xué)?!币呀?jīng)開(kāi)始進(jìn)入校園生活。下列校園的日常行為使用了人工智能技術(shù)的有( )
①早上6:30校園廣播自動(dòng)響起,提醒同學(xué)們起床
②上課時(shí),老師在一體機(jī)上通過(guò)手寫(xiě)輸入錄入文字
③教學(xué)樓走廊的燈檢測(cè)到有人靠近時(shí)會(huì)自動(dòng)打開(kāi)
④英語(yǔ)課上,老師通過(guò)有道詞典的在線翻譯功能輔助進(jìn)行翻譯
⑤晚自習(xí)結(jié)束,通過(guò)人臉識(shí)別系統(tǒng)進(jìn)行入寢點(diǎn)名組卷:13引用:3難度:0.5 -
4.使用Word軟件編輯文檔,部分界面如圖所示。下列說(shuō)法正確的是( ?。?br />
組卷:23引用:3難度:0.5 -
5.Access中的一張數(shù)據(jù)表設(shè)計(jì)視圖如圖所示。下列說(shuō)法正確的是( ?。?/h2>
組卷:7引用:3難度:0.5 -
6.使用Access軟件打開(kāi)數(shù)據(jù)庫(kù),部分界面如圖所示。下列說(shuō)法正確的是( ?。?br />
組卷:0引用:2難度:0.8
二、非選擇題(本大題共4小題,其中第15小題4分,第16小題4分,第17小題6分,第18小題8分,共22分)
-
17.給定兩個(gè)十進(jìn)制整數(shù)X和Y(X<=Y),求出從X到Y(jié)的所有整數(shù)中出現(xiàn)“1”的個(gè)數(shù)。例如:X=6,Y=15時(shí),6,7,8,9,10,11,12,13,14,15,出現(xiàn)了7個(gè)“1”。小明編寫(xiě)了一個(gè)VB程序,功能如下:在文本框Text1中輸入整數(shù)X,在文本框Text2中輸入整數(shù)Y,單擊“統(tǒng)計(jì)”按鈕Command1后,在列表框List1中顯示X到Y(jié),并在標(biāo)簽Label3中顯示從X到Y(jié)的所有整數(shù)中出現(xiàn)“1”的個(gè)數(shù)。程序運(yùn)行界面如圖所示,請(qǐng)?jiān)跈M線處填入合適代碼。
(1)下列程序段中句List1.AddItem中的AddItem是
(2)為了實(shí)現(xiàn)上述功能,請(qǐng)?jiān)跈M線處填入合適的代碼。
PrivateSubCommand1_Click ( ?。?br />DimxAsInteger,yAsInteger,tAsInteger
DimiAsInteger,nAsInteger,countAsInteger
x=Val(Text1.Text)
y=Val(Text2.Text)
count=0
Fori=xToy
List1.AddItemStr(i)
n=i
DoWhilen>0
IfnMod10=1Then
count=count+1
EndIf
Loop
Nexti
Label3.Caption=“X到Y(jié)之間1的個(gè)數(shù)有“+
EndSub
(3)如果刪除加框處代碼,并運(yùn)行程序,在文本框Text1中輸入“40”,在文本框Text2中輸入“10”,單擊“統(tǒng)計(jì)”按鈕,則標(biāo)簽框Label3顯示X到Y(jié)之間1的個(gè)數(shù)有組卷:0引用:1難度:0.3 -
18.小劉記錄了某地每天最高氣溫和最低氣溫,現(xiàn)要編寫(xiě)VB程序,計(jì)算一周內(nèi)最大溫差(當(dāng)日最高氣溫與最低氣溫之差)。功能如下:在文本框Text1中依次輸入本周內(nèi)每天的最高氣溫與最低氣溫(數(shù)據(jù)都用逗號(hào)分隔并以逗號(hào)結(jié)尾),單擊“計(jì)算”按鈕Cmd后,程序計(jì)算出最大溫差,結(jié)果顯示在Label1中。界面設(shè)計(jì)如下圖所示:
(1)Cmd對(duì)象屬于
(2)實(shí)現(xiàn)上述功能的VB程序如下,請(qǐng)?jiān)跈M線處填入合適的代碼。
PrivateSubCommand1_Click ( ?。?br />DimiAsInteger,jAsInteger,kAsInteger
DimminAsSingle,maxAsSingle
DimdAsSingle,vAsSingle,sAsString
s=Text1.Text
d=0:maxd=0
j=1:k=1
Fori=1ToLen(s)
IfMid(s,i,1)=“,“Then
j=i+1
If
max=v
Else
min=v
d=max-min
Ifd>maxdThen
EndIf
k=k+1
EndIf
Nexti
Label1.Caption=“本周溫差最大值為“&Str(maxd)
EndSub
(3)加框處的代碼有誤,請(qǐng)改正:
(4)運(yùn)行該程序,輸入數(shù)據(jù)如圖所示,程序執(zhí)行到循環(huán)結(jié)束時(shí),變量k為組卷:0引用:1難度:0.3