2015-2016學(xué)年浙江省杭州二中高二(上)期末信息技術(shù)試卷(選考)
發(fā)布:2024/4/20 14:35:0
一、選擇題(每小題2分,共14題28分)
-
1.“口說(shuō)無(wú)憑”指的是說(shuō)過(guò)的話(huà)無(wú)據(jù)可查,在進(jìn)行重大交易時(shí),往往需要簽訂書(shū)面協(xié)議,這主要體現(xiàn)了信息的( ?。?/h2>
組卷:25引用:6難度:0.9 -
2.用十六進(jìn)制查看字符內(nèi)碼,結(jié)果如圖所示
該字符內(nèi)碼可能是( )組卷:2引用:2難度:0.9 -
3.在Word中使用鍵盤(pán)輸入文本時(shí),部分字詞的下方出現(xiàn)了紅色的波浪線(xiàn),這表明這部分字詞處( )
組卷:4引用:5難度:0.9 -
4.某Access數(shù)據(jù)表如圖所示:
以下說(shuō)法中正確的是( ?。?/h2>組卷:8引用:2難度:0.7 -
5.一張1600*1200像素16位色的bmp圖象,把它另存為分辨率為800*600像素16色的bmp圖象,其存儲(chǔ)空間是原來(lái)的( ?。?/h2>
組卷:4引用:1難度:0.7 -
6.小明媽媽想了解一下浙江省人民政府網(wǎng)最新新聞動(dòng)態(tài),上網(wǎng)使用瀏覽器訪(fǎng)問(wèn)浙江省人民政府網(wǎng)站http://www.zhejiang.gov.cn/,瀏覽網(wǎng)站所采用的協(xié)議是( ?。?/h2>
組卷:7引用:2難度:0.9
二、填空題(11題每空1分,12-14題每空2分,共20分)
-
17.【加試題】下列程序的功能是將text1中輸入的自然數(shù)分解為3個(gè)互不相同的質(zhì)數(shù)(三個(gè)質(zhì)數(shù)的和等于輸入的自然數(shù)),并把分解產(chǎn)生的質(zhì)數(shù)按升序順序顯示在右邊的列表框中.例如,輸入20,那么在列表框中會(huì)顯示如下圖所示結(jié)果.其中,界面中“分解”按鈕的名稱(chēng)是“Command1”,程序中函數(shù)f(x)的功能是判斷x是否為質(zhì)數(shù),如果是質(zhì)數(shù),則返回值為true,否則返回false.
請(qǐng)?jiān)谙铝谐绦虼a的基礎(chǔ)上按照要求設(shè)計(jì)該程序,完善程序中的劃線(xiàn)部分.
Dim n As Integer,a1As Integer,a3As Integer,a3As Integer
Function f(x)As Boolean
f=True
For i=2To Sqr(x)
If x Mod i=0Then
Next i
End Function
Private Sub Command1_Click( )
n=
For a1=2To n
For a2=a1To n
For a3=a2To n
If
List1.AddItem Str(a1)+“”+Str(a2)+“”+Str(a3)
End If
Next a3
Next a2
Next a1
End Sub
(1)程序中①橫線(xiàn)處應(yīng)填入
(2)程序中②橫線(xiàn)處應(yīng)填入
(3)程序中③橫線(xiàn)處應(yīng)填入組卷:20引用:2難度:0.1 -
18.小明利用所學(xué)的信息技術(shù)知識(shí)幫助語(yǔ)文老師設(shè)計(jì)一個(gè)語(yǔ)文學(xué)考等級(jí)查詢(xún)系統(tǒng),要求如下:輸入某個(gè)等級(jí),就能查出該等級(jí)的所有學(xué)生學(xué)號(hào)和姓名,并統(tǒng)計(jì)出該等級(jí)學(xué)生的人數(shù),以便語(yǔ)文老師方便了解學(xué)生的學(xué)考情況.語(yǔ)文學(xué)考成績(jī)分A、B、C、D、E五個(gè)等級(jí),學(xué)生信息存儲(chǔ)在數(shù)據(jù)庫(kù)文件“stugrade.jye.ai”的數(shù)據(jù)表“Chinese”中,數(shù)據(jù)表“Chinese”的結(jié)構(gòu)如圖1所示.
VB程序運(yùn)行界面如圖2所示,在文本框Text1中輸入查詢(xún)的等級(jí),單擊“查詢(xún)”按鈕Command1,在列表框List1中顯示所有該等級(jí)的學(xué)生學(xué)號(hào)和姓名,并按照學(xué)號(hào)從小到大排序,并在標(biāo)簽Label2處顯示學(xué)生的人數(shù),如果人數(shù)為0,則在列表框中顯示“沒(méi)有該等級(jí)的學(xué)生”.按此要求編寫(xiě)程序如下,在橫線(xiàn)處填上合適的代碼.
Private Sub Command1_Click ( ?。?br />Dim stuna(1To 100)As String'存放學(xué)生姓名的數(shù)組定義為stuna
Dim stunum(1To 100)As String'存放學(xué)生學(xué)號(hào)的數(shù)組定義為stunum
Dim i As Integer,j As Integer,n As Integer
Dim t As String
Dim cn As New ADODB.Connection'連接數(shù)據(jù)庫(kù)
Dim rs As New ADODB.Recordset
Dim strSQL As String
cn.ConnectionString=“Provider=Microsoft.ACE.OLEDB.12.0;Data Source=“+App.Path+“\stugrade.jye.ai“
cn.Open
strSQL=“select*from ①where 語(yǔ)文等級(jí)='“+Text1.Text+“'“
Set rs.ActiveConnection=cn
rs.Open strSQL
n=0
Do While Not rs.EOF
②
stuna(n)=rs.Fields(“姓名“).Value
stunum(n)=rs.Fields(“學(xué)號(hào)“).Value
rs.MoveNext
Loop
rs.Close
cn.Close
Set rs=Nothing
Set cn=Nothing
List1.Clear'清除列表框
If n=0Then
List1.AddItem“沒(méi)有該等級(jí)的學(xué)生“
Else
For i=1To n-1'按姓名排序
For j=n To ③Step-1
If④Then
t=stunum(j):stunum(j)=stunum(j-1):stunum(j-1)=t
t=stuna(j):stuna(j)=stuna(j-1):stuna(j-1)=t
End If
Next j
Next i
For i=1To n
List1.AddItem stunum(i)+““+stuna(i)
Next i
Label2.Caption=“該等級(jí)的學(xué)生共有“+Str(n)+“名“
End If
End Sub
①
②
③
④組卷:3引用:1難度:0.1