2018-2019學(xué)年浙江省麗水市四校聯(lián)考高二（下）月考信息技術(shù)試卷（5月份）
發(fā)布：2024/11/26 22:0:2
一、選擇題（本大題共12小題，每小題2分，共24分．在每小題給出的四個選項中，只有一個符合題目要求）
-
1．下列關(guān)于信息的說法，正確的是（ ）
組卷：17引用：1難度：0.5 -
2．以下有關(guān)網(wǎng)絡(luò)應(yīng)用和協(xié)議的敘述，正確的是（ ?。?/h2>
組卷：3引用：1難度：0.5 -
3．用Word軟件編輯某文檔，界面如圖所示。下列說法正確的是（ ）
組卷：7引用：1難度：0.5 -
4．使用UltraEdit軟件查看“6.5世界環(huán)境日”的內(nèi)碼，部分界面如圖所示。下列說法正確的是（ ?。?br />
組卷：6引用：1難度：0.5 -
5．使用GoldWave軟件編輯某音頻文件，選擇其中一段音頻后的部分界面如圖所示。下列說法正確的是（ ）
組卷：5引用：1難度：0.7
二、非選擇題（本大題共4小題，其中第13小題4分，第14小題8分，第15小題7分，第16小題7分，共26分）
-
15．小李在學(xué)習漢字的編碼后，了解到漢字區(qū)位碼由2個字節(jié)組成，前面1個字節(jié)表示區(qū)碼，后面1個字節(jié)表示位碼，將區(qū)位碼（十進制）分別加上160就得到了該漢字的內(nèi)碼。
小李編寫了一個查看漢字區(qū)位碼的VB程序，實現(xiàn)如下功能：在Text1中輸入一個漢字，單擊“查看”按鈕Commandl,在Label2中顯示該漢字的區(qū)位碼。程序運行界面如圖所示。
（1）程序編寫調(diào)試后，生成如下相關(guān)文件：A．zbc.jye.ai/B．zbc.jye.ai/C．zbc.jye.ai/D．zbc.jye.ai,其中屬于Windows系統(tǒng)可抗行文件的是（單選，填字母）。
（2）實現(xiàn)上述功能的VB程序如下，請在畫線處填入合適的代碼。
Private Sub Commandl_Click （ ?。?br />Dim a As Long,h As Long,t As Long,v As Long,ch As Long
Dim s As String,x As String,y As String
s=″″：t=0：v=0
h=65536+Asc（Text1．Text）'將漢字的十進制內(nèi)碼賦值給h
Do While h＜＞0
a=h Mod 2
h=h\2
s=CStr（a）+s
Loop
x=
y=Mid（s,Len（s）-7，8）
For i=Len（x） To 1Step-1
ch=Va10Mid（x,i,1））
Next i
Labe12．Caption=“該漢字的區(qū)位碼為：″+Str（t-160）+″位碼為：″+Str（v-160）
End Sub
（3）若經(jīng)過Do While循環(huán)后，s的值為“1010101111001100”，則畫框處循環(huán)內(nèi)的語句執(zhí)行了次。組卷：0引用：1難度：0.4 -
16．某種字符加密方法描述如下：
①輸入明文、密鑰。
②在明文中從左往右每次取連續(xù)的8個字符。
③將8個字符圍成一圈，從第1個字符開始1，2，3，……數(shù)數(shù)，數(shù)到密鑰值時取出該位字符；再由下一個字符開始1，2，3，……數(shù)數(shù)，數(shù)到密鑰值時取出該位字符，重復(fù)此過程，直至這8個字符被取完。
④依次把取出的8個字符拼接成新的字符串。
⑤重復(fù)②-④步驟，直至所有明文字符處理完畢。
編寫一個VB程序，實現(xiàn)功能如下：程序運行時從文本框Textl中讀入一串明文（長度為8的倍數(shù)），從文本框Text2中讀入密鑰y,單擊“加密”按鈕Commandl,對明文按上述方法轉(zhuǎn)換后在文本框Text3中顯示。程序運行界面如圖所示。
（1）運行上述程序，若在文本框Textl中輸入“Let's go”，Text2中輸入“3”，單擊“加密”按鈕，則文本框Text3中顯示的內(nèi)容是。
（2）實現(xiàn)上述功能的VB程序如下，請在橫線處填入合適代碼。
Const n=1000
Private Sub Commandl_Click （ ?。?br />Dim f （1 To n） As Integer,cq （1 To n） As Integer
Dim a （1 To n） As String,s As String,res As String
Dim y As Integer,p As Integer,begin As Integer
s=Textl.Text：y=Val（Text2．Text）
For i=1 To 8
f（i）=1
Next i
'計算出列順序
p=0
For i=1 To 8
j=1
Do While j＜=y
p=p Mod 8+1
j=
Loop
f（p）=0：cq（i）=p
Next i
For i=1 To Len（s）
a（i）=Mid （s,i,1）
Next i
i=1：begin=-8：res=″″
Do While i＜=Len（s）
If i Mod 8=1 Then
res=res+
i=i+1
Loop
Text3．Text=res
End Sub組卷：0引用：1難度：0.4