2019-2020學(xué)年浙江省臺(tái)州市書生中學(xué)高二（上）第一次月考信息技術(shù)試卷
發(fā)布：2024/4/20 14:35:0
一、選擇題（共12小題，每小題2分，滿分24分）
-
1．在網(wǎng)上閱卷的大背景下，個(gè)人信息條形碼使用廣泛，下列有關(guān)信息的說法，正確的是（ ）
組卷：15引用：1難度：0.7 -
2．用Ultraedit軟件查看字符“2019，高考！”的內(nèi)碼，部分界面如圖所示。下列說法正確的是（ ）
組卷：5引用：2難度：0.4 -
3．某版本軟件的相關(guān)信息如圖所示。分析圖中信息，下列說法不正確的是（ ?。?/h2>組卷：7引用：2難度：0.7 -
4．將一幅未經(jīng)壓縮的1024*768像素，256色BMP圖片，轉(zhuǎn)換成JPEG格式后，存儲(chǔ)容量為76.8KB，則壓縮比約為（ ?。?/h2>
組卷：6引用：4難度：0.6 -
5．下列VB表達(dá)式中，值最大的是（ ）
組卷：12引用：3難度：0.7
二、解答題（共3小題，滿分26分）
-
14．編寫“幸運(yùn)數(shù)字”程序，功能如下：在文本框Text1中輸入出生日期，單擊“算一算”按鈕Command1，將日期中所有的數(shù)字按位相加，若結(jié)果為兩位數(shù)則繼續(xù)按位相加，直到結(jié)果為一位數(shù)，如出生日期為2003/08/11，數(shù)字按位相加2+0+0+3+0+8+1+1=15，15按位相加1+5=6．運(yùn)行界面如圖所示。
（1）程序窗體中共有類對(duì)象。
（2）請(qǐng)?jiān)跈M線處填入合適的代碼。
Private Sub Command1_Click （ ）
Dim luck As Integer
Dim sr,c As String
luck=0
sr=Text1．Text
If Len（sr）=10 Then′輸入的格式長度符合條件
For i=1 To Len（sr）
c=
If c＞=“0“And c＜=″9″Then
luck=luck+Val（c）
End If
Next i
Do While luck＞9
luck=luck Mod 10+
Loop
Label2．Caption=″你的幸運(yùn)數(shù)字是：″+str（luck）
Else
Label2．Caption=″輸入有誤，請(qǐng)重輸！″
End If
End Sub
（3）若在文本框Text1中輸入“2004/08/18”，Label2中顯示的內(nèi)容為。組卷：1引用：1難度：0.5 -
15．設(shè)某漢字由7×7 的0、1 點(diǎn)陣圖案組成。依照以下規(guī)則生成壓縮碼：連續(xù)一組數(shù)值，從漢字點(diǎn)陣圖案的第一行第一個(gè)符號(hào)開始計(jì)算，按書寫順序由左到右，從上到下。壓縮碼第一個(gè)數(shù)表示起始的數(shù)字（例如0），第二個(gè)數(shù)表示連續(xù)有幾個(gè)0，第三個(gè)數(shù)表示接下來連續(xù)有幾個(gè)1，第四個(gè)數(shù)表示接下來連續(xù)有幾個(gè)0，第五個(gè)數(shù)表示接下來連續(xù)有幾個(gè)1，以此類推……
例如，以下漢字點(diǎn)陣圖案：
0001000
0001000
0001111
0001000
0001000
0001000
1111111
對(duì)應(yīng)的壓縮碼是031616431616137（第一個(gè)數(shù)是0，表示一開始時(shí)的數(shù)字為0）。
（1）請(qǐng)將程序代碼補(bǔ)充完整。
Private Sub Command1_Click （ ）
Dim code As String,c As Integer,res As String,k As Integer
code=Text1．Text
k=0
res=″″
c=Val（Mid（code,1，1））
For i=2 To Len（code）
For j=1 To Val（Mid（code,i,1））'
res=
If k=7 Then
List1．AddItem res
k=0
res=″″
End If
Next j
c='
Next i
End Sub
（2）現(xiàn)給出如下點(diǎn)陣圖：
則壓縮碼為。組卷：1引用：1難度：0.4