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