2021年浙江省信息技術(shù)押題試卷（1月份）（三）（選考）
發(fā)布：2024/4/20 14:35:0
一、選擇題（本大題共12小題，共12.0分）
-
1．下列有關(guān)信息的說法，不正確的是（ ?。?/h2>
組卷：4引用：1難度：0.6 -
2．下列關(guān)于人工智能的說法，正確的是（ ?。?/h2>
組卷：4引用：1難度：0.6 -
3．小丁利用Word軟件編輯了一篇關(guān)于中國(guó)文字的文檔，部分界面如圖所示，下列說法正確的是（ ?。?br/>
組卷：9引用：4難度：0.9 -
4．已有Access軟件創(chuàng)建的“部分食品進(jìn)貨數(shù)據(jù)”表結(jié)構(gòu)及數(shù)據(jù)表如圖所示，下列四個(gè)選項(xiàng)中能作為記錄添加進(jìn)該表的是（ ?。?/h2>組卷：21引用：4難度：0.9 -
5．小張對(duì)A．bmp圖象文件（如圖所示）進(jìn)行如下處理，利用Winrar將A．bmp進(jìn)行壓縮，得到B．rar文件；利用Photoshop軟件將A．bmp另存為C．jpg；把A．bmp重命名為D．jpg,下列說法正確的是（ ?。?/h2>組卷：2引用：3難度：0.5
二、非選擇題（本大題共4小題，共4.0分）
-
15．在平面坐標(biāo)系中，給定任意個(gè)點(diǎn)，求出這些點(diǎn)中與點(diǎn)（1，1）距離最遠(yuǎn)的點(diǎn)。小李編寫出了相應(yīng)功能的程序：在文本框 Text1中輸入這些點(diǎn)的坐標(biāo)值（數(shù)據(jù)都用逗號(hào)分隔并以逗號(hào)結(jié)尾），單擊“計(jì)算”按鈕Cmd后，程序計(jì)算這些點(diǎn)到（1，1）的距離后，結(jié)果顯示在列表框List中，并且輸出最大距離的點(diǎn)。程序運(yùn)行界面如圖所示。
（1）由圖可知，窗體中的對(duì)象共有類
（2）實(shí)現(xiàn)上述功能的VB程序如下，請(qǐng)?jiān)跈M線處填入合適的代碼。
①②
（3）若文本框Text1中輸入的內(nèi)容為“31，41，26，51，1，56，”，程序運(yùn)行結(jié)束后，距離（1，1）最遠(yuǎn)的坐標(biāo)點(diǎn)是。組卷：0引用：2難度：0.5 -
16．小王設(shè)計(jì)了一個(gè)順時(shí)針旋轉(zhuǎn)矩陣的程序，其功能為：運(yùn)行程序時(shí)，在文本框Text1中輸入矩陣規(guī)模n,點(diǎn)擊“產(chǎn)生矩陣”按鈕command1，在列表框List1中顯示一個(gè)n*n的矩陣，該矩陣數(shù)據(jù)由從1開始的連續(xù)自然數(shù)組成。點(diǎn)擊“旋轉(zhuǎn)矩陣”按鈕command2，該矩陣順時(shí)針旋轉(zhuǎn)90度并顯示在列表框List2中，此后，每點(diǎn)一次“旋轉(zhuǎn)矩陣”按鈕command2，列表框List2中顯示的矩陣順時(shí)針旋轉(zhuǎn)90度。
（1）運(yùn)行程序，在文本框Text1中輸入5，點(diǎn)擊“產(chǎn)生矩陣”按鈕command1，再連續(xù)點(diǎn)擊三次command2按鈕，則列表框List2中第一行顯示的內(nèi)容是。
（2）實(shí)現(xiàn)此程序的代碼如下，請(qǐng)完成程序填空。
①
②
③
Dim n As IntegerDim st As String
Dim a（ 1 To 1005 As Integer
Dim b（ 1 To 100）As Integer
Private Sub Command1_Click（ ?。?br />n=Val（ Text1.Text）
For i=1 To n*n
a（i）=i
Next i
For i=1 To n
st-““
For j=1 To n
st-st+adj（ Str（a（i-1）*n+j）），3）
Next j
List1.AddItem st
Next i
End Sub
Private Sub Command2_Click（ ）
List2.Clear
For i=1 To n
st-““
For j=1 To n
b（（i-1）*n+j）=①
st=st+adj（Str（b（（i-1）*n+j）），3）
Next j
List2.AddItem st
Next i
For i=1 To n*na（i）=②
Next i
End Sub
'adj函數(shù)的功能：在字符串a(chǎn)前加入適當(dāng)?shù)目崭?，使a的長(zhǎng)度為n位Function adj（a As String,n As Integer）As String
Dim sa As String
na=Len（a）：sa=a
For i=1 To n-na
sa=““sa
Next i
adj=③
End Function組卷：1引用：1難度：0.3