2017年浙江省寧波市高考信息技術(shù)試卷
發(fā)布:2024/4/20 14:35:0
一.選擇題(每題2分)
-
1.市民首次登錄iNingbo免費(fèi)WIFI熱點(diǎn),需要用手機(jī)獲取驗(yàn)證碼并注冊(cè),對(duì)驗(yàn)證碼進(jìn)行驗(yàn)證并判定是否注冊(cè)成功這一過(guò)程屬于( ?。?/h2>
組卷:9引用:2難度:0.9 -
2.用Word軟件編輯某文檔,部分界面如圖所示. 下列有關(guān)圖中批注與修訂的說(shuō)法,不正確的是( ?。?img alt="菁優(yōu)網(wǎng)" src="https://img.jyeoo.net/quiz/images/201708/76/6e6cb00a.png" style="vertical-align:middle" />
組卷:10引用:1難度:0.9 -
3.某網(wǎng)頁(yè)包含下列元素:①文字②圖片③超鏈接④動(dòng)畫(huà)⑤背景音樂(lè),保存網(wǎng)頁(yè)時(shí)部分界面如圖所示,則保存下來(lái)的網(wǎng)頁(yè)內(nèi)容包含( ?。?nbsp;
組卷:7引用:1難度:0.9 -
4.使用Access軟件創(chuàng)建一張數(shù)據(jù)表,其設(shè)計(jì)視圖如圖所示.在數(shù)據(jù)表視圖錄入數(shù)據(jù)時(shí),下列操作能實(shí)現(xiàn)的是 ( )
組卷:7引用:1難度:0.9 -
5.某算法的部分流程圖如圖所示,執(zhí)行該算法,輸出S的結(jié)果是( ?。?/h2>
組卷:8引用:8難度:0.7
二.非選擇題
-
16.用VB編寫(xiě)程序,在文本框Text1中輸入任意字符串s,統(tǒng)計(jì)s中數(shù)字字符串的數(shù)值和(如輸入字符串“ab123dr34fg9de”則輸出166,即123+34+9=166.)并在Labe13輸出結(jié)果.程序設(shè)計(jì)界面如下:
根據(jù)算法將下列程序補(bǔ)充完整.
Private Sub Command1_Click( ?。?br />Dim s As String,ch As String,s As Integer
Dim ch2 As String,sum As Double
Dim n As Integer,i As Integer
s=Text1.Text
i=1;sun=0
Do While i=n
ch=Mid(s,i,1)
If ch>=“0“And ch<=“9“Then
j=i
ch2=Mid(s,j,1)
Do While ch2>=“0“And ch2“9“
j=j+1
ch2=Mid(s,j,1)
Loop
sum=sum+
i=j
End If
i=i+1
Loop
Label3.Caption=Str(sum)
End Sub.組卷:15引用:3難度:0.1 -
17.某字符串(字節(jié)數(shù)為3的倍數(shù))編碼規(guī)則如下:(1)將該字符串內(nèi)碼分成3個(gè)字節(jié)一組,順次連接后得到24位二進(jìn)制數(shù);
(2)將得到的24位二進(jìn)制數(shù)字分成4組,每組6個(gè)位;
(3)在每組數(shù)字前補(bǔ)上兩個(gè)0,得到4個(gè)字節(jié)的二進(jìn)制數(shù);
(4)將(3)中得到的四個(gè)二進(jìn)制數(shù)分別轉(zhuǎn)化為十進(jìn)制數(shù);
(5)將每個(gè)十進(jìn)制數(shù)轉(zhuǎn)換為1個(gè)加密字符,對(duì)應(yīng)的“密碼表”按數(shù)值由小到大依次為“ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/”
小明按照上述方法,設(shè)計(jì)了一個(gè)字符串(僅包含ASCⅡ字符)加密的VB程序,功能如下:?jiǎn)螕簟凹用馨粹o”Command1,程序依次將文本框Text1中每3個(gè)字符的ASCⅡ碼值按編碼規(guī)則轉(zhuǎn)換為四個(gè)加密字符,連接這些加密字符,最后在文本框Text2中輸出加密結(jié)果.程序運(yùn)行效果如圖所示.
實(shí)現(xiàn)上述功能的VB程序如下:
(1)在上述加密算法步驟(4)中,得到的十進(jìn)制數(shù)最大是
(2)實(shí)現(xiàn)上述功能的VB程序如下.請(qǐng)?jiān)跈M線處填入合適代碼.
Function Code2Char(c As Integer)As String
Dim s As String
s=“ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz0123456789+/“
Code2Char=
End Function
Private Sub Command1_Click( ?。?加密過(guò)程
Dim n As Integer,s As Integer,i As Integer,ss As String
Dim a1 As Integer,a2 As Integer,a3 As Integer'存儲(chǔ)加密前字符的ASC碼
Dim b1 As Integer,b2 As Integer'分別存儲(chǔ)分割、轉(zhuǎn)換后的前兩個(gè)十進(jìn)制數(shù)
Dim b3 As Integer,b4 As Integer'分別存儲(chǔ)分割、轉(zhuǎn)換后的后兩個(gè)十進(jìn)制數(shù)
s=Text1.Text
n=Len(s)
ss=““
For i=1 To n
a1=Asc(Mid(s,i,1))
a2=Asc(Mid(s,i+1,1))
a3=Asc(Mid(s,i+2,1))
b1=a1\4
b2=(a1 Mod4)*4+(a2\16)
b3=
b4=a3 Mod 64
ss=ss+Code2Char(b1)+Code2Char(b2)+Code2Char(b3)+Code2Char(b4)
Next i
Text2.Text=ss
End Sub.組卷:6引用:1難度:0.1