2016-2017學(xué)年浙江省杭州周邊四校高三(上)期中信息技術(shù)試卷
發(fā)布:2024/12/2 9:30:2
一、選擇題(本大題共12小題,每小題2分,共24分.在每小題給出的四個(gè)選項(xiàng)中,只有一個(gè)符合題目要求)
-
1.校慶100周年時(shí),小慶用數(shù)碼攝像機(jī)拍攝表演的節(jié)目,數(shù)碼攝像機(jī)的CCD芯片自動(dòng)將光信號(hào)轉(zhuǎn)換成0和1的數(shù)字信號(hào),這個(gè)過程屬于( )
組卷:4引用:1難度:0.9 -
2.用UltraEdit軟件觀察“Bonnie@163.com”這幾個(gè)字符的內(nèi)碼,如圖所示.
則“&Andy”這幾個(gè)字符的內(nèi)碼是( ?。?/h2>組卷:10引用:2難度:0.9 -
3.小蓓利用Access 2010軟件打開暢銷書列表,界面如圖所示,下列說法中正確的是( ?。?br />
組卷:3引用:1難度:0.9 -
4.“Parkour”一詞翻譯成中文為“跑酷”,《地鐵沖浪》就是一款流行的移動(dòng)設(shè)備跑酷游戲,其軟件開發(fā)團(tuán)隊(duì)在制作前先調(diào)查研究了用戶對(duì)該產(chǎn)品的需求情況,這屬于多媒體作品制作過程( ?。?/h2>
組卷:10引用:6難度:0.9 -
5.小梅使用Word編輯文檔時(shí)的界面如圖所示,下列說法中正確的是( ?。?br />
組卷:19引用:3難度:0.7
二、非選擇題(本大題共5小題,其中第13小題4分,第14小題5分,第15小題8分,第16小題4分,第17小題5分,共26分)
-
16.[加試題]素?cái)?shù)又稱質(zhì)數(shù),指在一個(gè)大于1的自然數(shù)中,除了1和此整數(shù)自身外,不能被其他自然數(shù)整除的數(shù).超級(jí)質(zhì)數(shù)的定義為:當(dāng)一個(gè)素?cái)?shù)從低位到高位依次去掉最后一位數(shù)后,剩下的數(shù)仍然是素?cái)?shù),則此數(shù)為超級(jí)素?cái)?shù).例如:3137、313、31、3均為素?cái)?shù),所以3137為超級(jí)素?cái)?shù).小蓉設(shè)計(jì)了一個(gè)程序查找四位正整數(shù)中的超級(jí)素?cái)?shù).
程序運(yùn)行時(shí),單擊Command1,則在列表框List1中顯示所有四位數(shù)的超級(jí)素?cái)?shù),并在標(biāo)簽Label1中顯示超級(jí)素?cái)?shù)的數(shù)量.程序運(yùn)行效果如圖所示.
實(shí)現(xiàn)上述功能的VB程序如下,請?jiān)跈M線處填入合適的代碼.
Private Sub Command1_Click ( )
Dim i As Integer,t As Integer,c As Integer
Dim flag As Boolean
c=0
For i=1001To 9999Step 2
t=i
flag=True
Do While t<>0
If ① Then
flag=False
Exit Do
End If
t=t\10
Loop
If flag Then
List1.AddItem Str(i)
②
End If
Next i
Label1.Caption=“四位超級(jí)素?cái)?shù)共有“+Str(c)+“個(gè)“
End Sub
Function prime(x As Integer) As Boolean
Dim i As Integer
prime=True
For i=2To x-1
If ③ Then
prime=False
Exit Function
End If
Next i
End Function
(1)①處的代碼為
②處的代碼為
③處的代碼為
(2)該程序的算法為組卷:2引用:1難度:0.1 -
17.[加試題]計(jì)算機(jī)中用一個(gè)字節(jié)來存儲(chǔ)一個(gè)字符的ASCII碼,低7位二進(jìn)制為ASCII編碼,在傳輸數(shù)據(jù)時(shí)最高位可作為奇偶校驗(yàn)位,具體方法是:若7位ASCII編碼有偶數(shù)個(gè)1,最高位為1,有奇數(shù)個(gè)1,則最高位為0.例如字母“A”的ASCII編碼是65(二進(jìn)制為1000001),則“A”的傳輸碼是“11000001”.小馬編寫了一個(gè)VB程序,把ASCII編碼轉(zhuǎn)換成傳輸碼,程序界面如圖所示.
(1)如果輸入字母“F”,則它的傳輸碼是
(2)具體的VB程序如下,請?jiān)跈M線處填入合適代碼.
Private Sub Command1_Click ( )
Dim s As String,i As Integer
Dim str As String,ch As String
List1.Clear
str=Text1.Text
For i=1To Len(str)
s=convert(ch)
List1.AddItem ch &“→“& s
Next i
End Sub
Private Function convert(ch As String) As String
Dim m As Integer,k As Integer,n As Integer,i As Integer,s As String
s=““
n=Asc(ch)
Do While n>0
s=m & s
If m=1Then
k=k+1
End If
n=n\2
Loop
For i=1To 7-Len(s)
s=“0“& s
Next i
If k Mod 2=0Then
s=“1“& s
Else
s=“0“& s
End If
End Function.組卷:2引用:1難度:0.1