2021年浙江省高考信息技術仿真試卷（三）
發布：2024/4/20 14:35:0
一、選擇題（本大題共12小題，每小題2分，共24分。每小題列出的四個備選項中只有一個是符合題目要求的，不選、多選、錯選均不得分）
-
1．下列關于瀏覽器及信息獲取的說法中正確的是（ ?。?/h2>
組卷：3引用：1難度：0.6 -
2．下列有關word相關功能說法不正確的是（ ?。?/h2>
組卷：2引用：1難度：0.5 -
3．設計“小微圖書管理系統”時，新建“圖書借閱”Access數據表，存放下列表格數據：以下有關“小微圖書管理系統”和Access數據表結構設計描述正確的是（ ）
圖書編號 圖書名稱 借閱人 借書日期 還書日期 是否損壞 JS0001 Python編程從入門到實踐 黃曉琳 2019-5-14 2019-6-5 否 JS0002 深入理解Java虛擬機 李語敏 2019-11-21 2019-12-25 是 …… …… …… …… …… …… JX0712 歷史的原聲 王甜甜 2019-1-19 2020-6-1 否 組卷：2引用：2難度：0.6 -
4．下列關于多媒體硬件設備和多媒體軟件工具說法不正確的是（ ?。?/h2>
組卷：12難度：0.5 -
5．用photoshop軟件制作“在線教育”作品。當前狀態下，下列說法正確的是（ ?。?br />
組卷：3引用：1難度：0.5
二、非選擇題（本大題共4小題，其中第13小題4分，第14小題8分，第15小題7分，第16小題7分，共26分）
-
15．編寫一個VB程序，實現如下功能：輸入s位數字構成的數字字符串（第1位數字不為0），移除k （0＜k＜s）個數字后，在保證原數字相對位置不變的情況下，使剩余數字組成的新數為最小（注：新數第1位不能為0）。例如8個數字構成的數字字符串“71803296”，移除3個數字，得到5位數字構成的最小數是“10296”，具體算法如圖a所示。
算法分析：要使得到的5位數字最小，首先需保證能取到5個數字，且首位應盡量小，那么取首位數的范圍應保證余下有4個數字，即在前4位中選最小非0的數字。
程序運行時，在文本框Text1中輸入一個數字字符串，在文本框Text2中輸入要移除的數字個數，單擊“運行”按鈕CmdRun后，在標簽Labell顯示得到的最小新數，程序運行界面如圖b所示。
（1）程序運行時，若要在名為Form1的窗體標題上顯示“刪數”，可以在Form Load事件處理過程中添加語句為（單選，填字母：A．Form1.Text=“刪數“\B．Form1.Caption=“刪數“\C．Form1.AddItem“刪數“）
（2）實現上述功能的VB程序代碼如下，請在橫線處填入合適的代碼。
Private Sub CmdRun_ Click （ ?。?br />Dim Num As String,New_num As String'Num為輸入的數字字符串
Dim i As Integer,j As Integer,m As Integer,
Dim As Integer,s As Integer,k As Integer
Dim a（30）As String,b（30）As Integer
Num=Text1.Text：s=Len（Num）
k=Val （Text2.Text）'k為刪除數字個數
For i=1 To s
a（i）=Mid（Num,i,1）
Nexti
j=1
m=1
n=①
For i=m+l To n'取第一個非零最小數字
If
Then m=I'加框處程序代碼有誤，請改正
Next i
b（j）=m
Do Whil②'取其他最小數字
m=m+1
n=n+1
For i=m+1 To n
If a（i）＜a（m） Then m=i
Next i
j=j+1：b（j）=m
Loop
For i=m+1 To s'最后直接取的數字
j=j+1：b（j）=i
Next i
For j=1 To s-k'輸出最小數
New_ num③
Next j
Labell.Caption=New_num
End Sub
（3）加框處程序代碼有誤，請改正。組卷：2引用：1難度：0.2 -
16．在平面直角坐標系中，給定一個矩形左下和右上2個坐標點即可確定該矩形，例如左下（1，1）、右上（5，4），則矩形如圖a所示。
現給定若干個小矩形的坐標點，要求判斷能否構建出一個新的大矩形，在大矩形中，各構成的小矩形無重疊，無空白。
例1：給定的5個小矩形能夠精確構建一個坐標為（1，1）、（5，4）的大矩形。
小矩形左下，右上坐標如下：5個小矩形精確構建一個大矩形（圖b）：
例2：給定的3個小矩形，有相交區域，有空白區域，不能精確構建成一個大矩形（圖c）。
在任何兩個小矩形坐標不完全相同的情況下，判定能否精確構建大矩形的算法如下：
構成的大矩形面積等于每個小矩形的面積之和；
獲取每個小矩形的所有坐標點，有且僅有四個點只出現一次，其他坐標點成對出現。
（1）給定3個矩形左下和右上坐標依次為[2，4]，[5，5]，[3，2]，[4，4]，[4，2]，[5，4]，請你再添加一個矩形坐標，使4個矩形精準構建一個大矩形，則添加矩形左下和右上坐標依次為。
（2）根據上述算法描述，用VB程序實現代碼如下，請在畫線處填入合適的代碼。
Const n=5'常量n存儲小矩形個數
Dim a（1 To 2*n）As Integer'存儲每個小矩形給定X軸坐標
Dim b（1 To 2*n）As Integer'存儲每個小矩形給定Y軸坐標
Private Sub Form_Load
'本過程讀取每個小矩形X軸坐標存儲在數組a中、每個小矩形Y軸坐標存儲在數組b中，并在List1中顯示代碼略
End Sub
Private Sub Command1_Click
Dim c（1 To 4*n）As Integer'存儲每個小矩形所有X軸坐標，1～2*n存左下和右上，2*n+1～4*n存左上和右下
Dim d（1 To 4*n）As Integer'存儲每個小矩形所有Y軸坐標，1～2*n存左下和右上，2*n+1～4*n存左上和右下
Dim mc（1 To 4*n）As Integer'記錄所有坐標是否成對重復，不重復為1，重復為0
Dim temp As Integer
Dim i As Integer,j As Integer,f As Integer
Dim sum As Integer,sumt As Integer,count As Integer
For i=1 To 2*n Step 2
sum=sum+（a（i+1）-a（i））*（b（i+1）-b（i））
Next i
f=1
For i=1 To 2*n
c（i）=a（i）
c（n*2+i）=a（i）
d（i）=b（i）
d（n*2+i）=b（i+f）
①
Next i
For i=1 To 4*n-1
For j=1 To 4*n-i
If c（j）＞c（j+1）Or c（j）=c（j+1）And d（j）＞d（j+1）Then
temp=c（j）：c（j）=c（j+1）：c（j+1）=temp
temp=d（j）：d（j）=d（j+1）：d（j+1）=temp
End If
Next j
Next i
sumt=②
If sum＜＞sumt Then
Label1.Caption=“不能精確構建”
Exit Sub'結束當前過程，不再執行后續程序
Else
For i=1 To 4*n
mc（i）=1
Next i
i=1
Do While i＜4*n
If c（i）=c（i+1）And d（i）=d（i+1）Then
mc（i）=0：mc（i+1）=0
i=i+2
Else
i=i+1
End If
Loop
count=0
For i=1 To 4*n
③
Next i
If count=4 Then Label1.Caption=“能精確構建“Else Label1.Caption=“不能精確構建”
End If
End Sub組卷：1難度：0.5