2020-2021學(xué)年浙江省嘉興市高二(上)期末信息技術(shù)試卷
發(fā)布:2024/10/26 9:30:2
一、選擇題(本大題共12小題,每小題2分,共24分。在每小題給出的四個選項中,只有一個符合題目要求。)
-
1.下列有關(guān)信息的說法,正確的是( ?。?/h2>
組卷:4引用:1難度:0.6 -
2.下列有關(guān)網(wǎng)頁和電子郵件的說法,正確的是( ?。?img alt="菁優(yōu)網(wǎng)" src="https://img.jyeoo.net/quiz/images/202102/76/ad4ab1e3.png" style="vertical-align:middle" />
組卷:3引用:1難度:0.6 -
3.小明在創(chuàng)客嘉年華活動中看到以下項目
①識別人臉后自動用合適的稱謂向來賓打招呼的機(jī)器人
②通過溫度感應(yīng)自動點(diǎn)亮的“月球燈”
③通過語音助手Siri控制家中各類電器
④利用虛擬現(xiàn)實(shí)技術(shù)提升文物修復(fù)的成功率
⑤說出垃圾名稱后能自動打開相應(yīng)分類垃圾桶的蓋子
以上應(yīng)用了人工智能技術(shù)的是( ?。?/h2>組卷:7引用:1難度:0.6 -
4.用Access軟件創(chuàng)建“學(xué)生信息”數(shù)據(jù)表,其數(shù)據(jù)表視圖和設(shè)計視圖部分界面如圖所示。下列說法錯誤的是( )
組卷:2引用:1難度:0.7 -
5.下列有關(guān)多媒體技術(shù)的描述,正確的是( ?。?/h2>
組卷:9引用:1難度:0.8
二、非選擇題(本大題共4小題,其中第13小題8分,第14小題8分,第15小題4分,第16小題6分,共26分。)
-
15.編寫VB程序?qū)崿F(xiàn)以下功能:在文本框Textl中輸入一個十進(jìn)制正整數(shù),單擊“計算”按鈕Commandl后,將該正整數(shù)轉(zhuǎn)換為二進(jìn)制數(shù),最后在文本框Text2中輸出該二進(jìn)制數(shù)中連續(xù)“0”或“1”的最長個數(shù)情況。
如:輸入十進(jìn)制數(shù)35,將其轉(zhuǎn)換為二進(jìn)制數(shù)為100011,其中最長連續(xù)數(shù)字是3個“0”。程序運(yùn)行界面如圖所示。
(1)實(shí)現(xiàn)上述功能的VB程序如下,請在橫線處填入合適的代碼。
PrivateSubCommandl_Click ( ?。?br />DimnAsInteger,IAsInteger,jAsInteger,mAsInteger
DimsAsString,chAsString,chlAsString,ch2AsString
n=Val(Textl.Text)
DoWhilen<>0
s=CStr(nMod2)+s'CStr將數(shù)字轉(zhuǎn)化為字符串,但不會有前導(dǎo)空格
①
Loop
ch1=Mid(s,1,1):ch=chl
i=2:j=1:m=0
Fori=2ToLen(s)
ch2=Mid(s,i,1)
If②
Ifi-j>mThen
m=i-j
ch=chl
EndIf
ch1=ch2
③
EndIf
Nexti
Text2.Text=Str(m)&″個″&ch
EndSub
(2)如果將程序中加框處的代碼去掉,在文本框Textl中輸入15,單擊Commandl后在標(biāo)簽Label2中顯示的內(nèi)容是組卷:0引用:1難度:0.5 -
16.編寫VB程序,實(shí)現(xiàn)在文本中統(tǒng)計以某字母開頭的單詞總數(shù),并依次輸出查找到的每個單詞。程序功能如下:文本框Text1中輸入文本(單詞間用空格、“,”、“.”分隔),文本框Text2中輸入開頭字母,單擊“查找”按鈕Commmandl后,標(biāo)簽Label1中顯示符合條件的單詞總數(shù),列表框Listl中依次輸出每個單詞,程序運(yùn)行界面如圖所示。
(1)要使程序運(yùn)行時,窗體Forml標(biāo)題欄自動顯示“統(tǒng)計指定字母開頭的單詞”,可在
(2)實(shí)現(xiàn)上述功能的VB程序如下,請在橫線處填入合適代碼。
PrivateSubCommand1_C1ick ( ?。?br />DimiAsInteger,jAsInteger,nAsInteger,flagAsBoolean
DimstAsString,szmAsString,chAsString,wordAsString,tmpAsString
st=Textl-Text
szm=Text2.Text
flag=True:n=0
Fori=1ToLen(st)
①
Ifch=szmAndflag=TrueThen
n=n+1:word=ch
Forj=i+1ToLen(st)
tmp=Mid(st,j,1)
Iftmp<>″″Andtmp<>″.″Andtmp<>″,″Then
②
Else
Listl.AddItemStr(n)+″.″+word
i=j
ExitFor
EndIf
Nextj
ElseIfch=″″Orch=″,″Orch=″.″Then
③
Else
flag=False
EndIf
Nexti
Label1.Caption=″字母″+szm+″開頭的單詞總數(shù):″+Str(n)
EndSub組卷:0引用:1難度:0.6