2020-2021學(xué)年浙江省嘉興市高二（下）調(diào)研信息技術(shù)試卷（6月份）
發(fā)布：2024/4/20 14:35:0
一、選擇題（本大題共12小題，每小題0分，共24分。每小題列出的四個備選項中只有一個是符合題目要求的，不選、多選、錯選均不得分）
-
1．下列關(guān)于信息與信息技術(shù)的描述，錯誤的是（ ?。?/h2>
組卷：2引用：1難度：0.6 -
2．下列描述錯誤的是（ ?。?/h2>
組卷：5引用：1難度：0.6 -
3．用 Access軟件設(shè)計某APP管理數(shù)據(jù)庫，其中已建好的“基本信息”數(shù)據(jù)表用于存儲如表所示的數(shù)據(jù)。
下列關(guān)于“基本信息”數(shù)據(jù)表的描述，錯誤的是（ ）編號 APP名稱 分類 容量 星級評分 最近更新 開發(fā)者 是否網(wǎng)絡(luò) 1 keep 生活 62.1MB 3.4 2021/04/03 北京卡路里 是 2 猿輔導(dǎo) 教育 71.7MB 4.2 2021/04/06 北京猿力教育 是 3 單機(jī)切水果 游戲 40.9MB 3.0 2020/07/21 廣州銀輝通訊 否 … … … … … … … 組卷：0引用：1難度：0.4 -
4．下列關(guān)于計算機(jī)信息編碼的描述，正確的是（ ）
組卷：13引用：6難度：0.5 -
5．用 Photoshop軟件制作“博鰲亞洲論壇”作品，在文字圖層輸入“博鰲亞洲論壇”，相關(guān)編輯后的效果如圖所示。
下列描述正確的是（ ?。?/h2>組卷：2引用：1難度：0.5
二、非選擇題（本大題共4小題，其中第1小題4分，第14小題8分，第15小題7分，第16小題7分，共26分）
-
15．某比賽項目由多位評委打分，然后根據(jù)項目難度系數(shù)計算最終得分。規(guī)則為：
最終得分=（所有評委打分總和-1個最高分-1個最低分）×項目難度系數(shù)
編寫VB程序，實現(xiàn)計算最終得分的功能。在文本框Text1中輸入項目難度系數(shù)和多位評委的打分，中間用“，”隔開并以“，”結(jié)尾，然后點擊計算按鈕，在文本框Text2中顯示最終得分。程序運行界面如圖所示。
（1）程序中計算按鈕的對象名是（單選，填字母：A.Command1/B.Cmd1/C.Cmd1_Click）。
（2）實現(xiàn)上述功能的VB程序如下，請在橫線處填入合適的代碼。
（3）程序中加框處代碼有錯，請改正。
Private Sub Cmd1_Click
Dim a（1 To 100）As Single
Dim i As Integer,j As Integer,k As Integer,m As Integer,n As Integer
Dim Tot As Single,tmp As Single
Dim s As String,v As String,ch As String
s=Text1.Text
n=1：v=““
Do While n＜=Len（s）
ch=Mid（s,n,1）
If ch＜＞“，“Then
v=v & ch
Else
a（m）=Val（v）
m=m+1
End If
n=n+1
Loop
For i=2 To m-2
For j=m-1 To i+1 Step-1
If a（i）＜a（j） Then
tmp=a（i）：a（i）=a（j）：a（j）=tmp
End If
Next j
Next i
Tot=0
For i=1 Tom
Tot=Tot+a（i）
Next i
Text2.Text=
End Sub組卷：3引用：2難度：0.2 -
16．某字符串加密算法，規(guī)則如下：
（1）根據(jù)字符串長度構(gòu)建一個最小的n*n矩陣，將字符串中每個字符從左到右，自上而下順序填入矩陣，不足部分用字符“*”代替；
（2）將矩陣轉(zhuǎn)置（行列對換），然后將奇數(shù)行字母內(nèi)碼加上1，偶數(shù)行字母內(nèi)碼減1，字符為a、z或A、Z時做循環(huán)處理。比如，字符a減1為z；字符Z加1為A。
（3）按從左到右，從上而下依次取出字符，形成新的字符串。如圖a為字符串“Go to the zoo.”的加密過程。編寫VB程序，在文本框Text1中輸入字符串，點擊“加密”按鈕，在文本框Text2中輸出加密后的字符串。程序運行結(jié)果如圖b所示。
（1）若在文本框Text1中輸入3個字母“Far”，執(zhí)行加密程序后，輸出結(jié)果為
圖a
圖b。
（2）實現(xiàn)上述功能的 VB 程序如下，請在橫線處填入合適的代碼
Dim a（1 To 100）As String,b（1 To 100）As String,n As Integer
Private Sub Command1_Click
Dim s1 As String,s2 As String,i As Integer,j As Integer,m As Single
s1=Text1.Text
m=Sqr（Len（s1））
If m＞Int（m） Then n=Int（m）+1 Else n=m
For i=1 To n*n
If i＜=Len（s1）Then a（i）=Mid（s1，i,1）Else a（i）=“*“
Next i
For i=1 To n
For j=1 To n
b（（i-1）*n+j）=‘將矩陣轉(zhuǎn)置
b（（i-1）*n+j）=jm（i,j）‘內(nèi)碼變換
Next j
Next i
s2=““
For i=1 To n*n
s2=s2 & b（i）
Next i
Text2.Text=s2
End Sub
Function jm（x As Integer,y As Integer） As String
Dim s As String
s=b（（x-1）*n+y）
If s＜=“Z“And s＞=“A“Or s＜=“z“And s＞=“a“Then
If x Mod 2＜＞0 Then
If s＜＞“Z“And s＜＞“z“Then
s=Chr（Asc（s）+1）
Else
s=Chr（Asc（s）-25）
End If
Else
If s＜＞“a“And s＜＞“A“Then
s=Chr（Asc（s）-1）
Else
s=
End If
End If
End If
End Function組卷：0引用：1難度：0.4