2020-2021學(xué)年浙江省寧波市鄞州區(qū)咸祥中學(xué)高二（下）期中信息技術(shù)試卷
發(fā)布：2024/4/20 14:35:0
一、選擇題（每題只有一個正確答案，每小題2分，共24分）
-
1．下列關(guān)于信息的說法不正確的是（ ）
組卷：1引用：2難度：0.7 -
2．以下關(guān)于瀏覽器及網(wǎng)頁的說法，正確的是（ ?。?/h2>
組卷：0引用：1難度：0.5 -
3．下列應(yīng)用使用了人工智能技術(shù)的有（ ）
①Word軟件中的“自動更正”功能
②Excel軟件中的“自動求和”功能
③通過在線翻譯網(wǎng)站把中文翻譯成英文
④家庭陪護(hù)機(jī)器人
⑤使用語音撥號組卷：3引用：2難度：0.6 -
4．關(guān)于Access數(shù)據(jù)庫和數(shù)據(jù)表，下列說法正確的是（ ?。?/h2>
組卷：1引用：2難度：0.8 -
5．使用UltraEdit軟件觀察字符“嗨～Luck!2020”的內(nèi)碼，部分界面如圖所示。下列說法正確的是（ ）
組卷：2引用：2難度：0.5
二、非選擇題（13題4分，14題8分，15題7分，16題7分，共26分）
-
15．小李編寫VB程序，實現(xiàn)如下功能：在文本框Text1中輸入一個“十六進(jìn)制數(shù)”（注：包含小數(shù)），例如：在文本框Text1中輸入A2.4，單擊“轉(zhuǎn)換”按鈕Command1，在文本框Text2中輸出該十六進(jìn)制對應(yīng)的十進(jìn)制數(shù)，運行界面如第14題圖所示。
（1）為實現(xiàn)上述功能，請在橫線處填入合適的代碼，使程序正常運行。
Private Sub Command1_Click （ ）
Dim i As Integer,x As String,n As Integer,m As Integer
Dim y As Integer,s As Single,r As String
x=Text1．Text
n=Len（x）'求長度
m=InStr（x,“?！埃?找小數(shù)點的位置
s=0
For i=1To n
r=Mid（x,i,1）
If r＞=“0“And r＜=“9“Then y=Val（r）
If r＞=“A“And r＜=“F“Then y=①
If i＜m Then s=②'整數(shù)部分
If i＞m Then s=s+y*16^（m-i）'小數(shù)部分
Next i
Text2．Text=③+“D“
End Sub
（2）在文本框Text1中輸入“A.8”，則在文本框Text2中輸出結(jié)果是。組卷：2引用：2難度：0.5 -
16．要求編寫一個“統(tǒng)計直角三角形的個數(shù)”的程序，功能如下：在文本框Text1中依次輸入3*N個數(shù)表示三角形的邊長（用逗號分隔并以逗號結(jié)尾），單擊“計算”按鈕Command1后，程序統(tǒng)計直角三角形個數(shù)，并在標(biāo)簽Label1中顯示。程序運行界面如圖1所示。
PrivateSubCommand1_Click （ ?。?br />DimiAsInteger,jAsInteger,kAsInteger
Dimx1AsSingle,x2AsSingle,x3AsSingle,tAsSingle
DimTotaldAsInteger,vAsSingle,sAsString
s=Text1.Text
k=0：j=1：Totald=0
Fori=1ToLen（s）
IfMid（s,i,1）=″，″Then
v=Val（Mid（s,j,i-j））'提取三角形邊長，保存在變量v中
①
IfkMod3=1Then
x1=v
ElseIfkMod3=2Then
x2=v
Ifx1＜x2Thent=x1：x1=x2：x2=t
Else
x3=v
Ifx1＜x3Thent=x1：x1=x3：x3=t
If②ThenTotald=Totald+1
EndIf
EndIf
Nexti
Label1.Caption=″一共構(gòu)成″+Str（Totald）+″個直角三角形″
EndSub
（1）請在①②橫線處補(bǔ)充合適的代碼。
（2）加框處代碼有誤，請改正。
（3）觀察程序代碼，若正確完成（1）、（2）后，調(diào)試過程中出現(xiàn)如圖2錯誤提示，可能是程序代碼執(zhí)行到第行報錯。組卷：0引用：2難度：0.5