2016-2017學年浙江省嘉興一中高二（上）期中信息技術試卷
發布：2024/12/17 17:0:2
一、選擇題（本大題共20小題，每小題1.5分，共30分．在每小題給出的四個選項中，只有一個符合題目要求）
-
1．下列有關信息與信息技術的說法，正確的是（ ）
組卷：7引用：1難度：0.9 -
2．歷史的車輪不可能倒轉，但可以通過閱讀歷史教材，了解唐朝從興盛到衰落的過程．這主要體現了信息的（ ）
組卷：3引用：1難度：0.9 -
3．下列是學生日常生活的六種行為：①上網查找研究性學習資料；②回答老師提問；③計算班級期中考試平均分成績；④化學實驗時用鼻子聞CO2氣味；⑤收聽校園廣播，下列選項均屬于信息獲取的是（ ）
組卷：25引用：3難度：0.5 -
4．以下行為不恰當的是（ ）
組卷：3引用：2難度：0.9 -
5．某同學利用百度搜索得到的部分界面如圖所示，以下說法錯誤的是（ ）
組卷：10引用：5難度：0.9 -
6．下列關于網上信息瀏覽與獲取正確的是（ ）
組卷：24引用：3難度：0.9 -
7．計算機中的英文字符編碼采用統一的ASCII編碼，若字母“A”的編碼用二進制表示為1000001B，則字符“D”的編碼用十六進制表示為（ ）
組卷：3引用：1難度：0.7
二、非選擇題（本大題共3小題，其中第21小題8分，第22小題7分，第23小題5分，共20分）
-
22．編寫VB程序，實現如下功能：窗體裝載時隨機生成10個1至100的整數，并顯示在列表框list1中，單擊“分組”按鈕command1，將這10個數分為奇數和偶數兩組，在list2中顯示奇數數字，及其個數，list3中顯示偶數數字，及其個數．運行界面如第題圖所示，程序代碼如下．
Dim a（1To 10）As Integer,b（1To 10）As Integer,c（1To 10）As Integer
Private Sub'窗體加載時產生10個1～100的整數
Dim i As Integer
Randomize
List1．Clear
For i=1To 10
a（i）='隨機產生1個1～100的整數
List1．AddItem Str（a（i））
Next i
End Sub
Private Sub Command1_Click （ ）
Dim i As Integer,ji As Integer,ou As Integer
List2．Clear
List3．Clear
ji=0：ou=0
For i=1To 10
If a（i） Mod 2＜＞0Then
List2．AddItem Str（a（i））
Else
List3．AddItem Str（a（i））
End If
Next i
List2．AddItem“共有奇數“+Str（ji）+“個“
List3．AddItem“共有偶數“+Str（ou）+“個“
End Sub
（1）觀察運行界面，選項中沒有用到的控件是（ 選項A．
B． 
C．
D．
）．
（2）②處應填的事件是．
（3）③的代碼應該是：（填選項號）．
A．Int（Rnd（ ）+100）*1 B．Int（Rnd（ ）+1）*100 C．Int（Rnd（ ）*100）+1
（4）請為④、⑤處填入合適的代碼，④：，⑤：．組卷：5引用：1難度：0.3 -
23．用物理天平測量物體的質量．待測得物體的質量為x克（x為小于1000的整數），下列程序為計算天平砝碼盤中所需的砝碼．已知天平可用砝碼為：500克1個，200克1個，100克2個，50克1個，20克1個，10克2個，5克1個，2克2個，1克1個．程序界面如圖所示．
Private Sub Command1_Click（ ）
Dim a（1To 12）As Integer,i As Integer,x As Integer
a（1）=500：a（2）=200：a（3）=100：a（4）=100：a（5）=50：a（6）=20
a（7）=10：a（8）=10：a（9）=5：a（10）=2：a（11）=2：a（12）=1
i=1
x=Val（Text1．Text）
List1．Clear
Do While x＜＞0
If x＞=a（i） Then
List1．AddItem Str（a（i））
End If
i=i+1
Loop
End Sub
（1）如要將程序窗口標題“Form1”修改為“天平測質量”，則應該修改窗體的屬性（選填：Name/Caption/Text/Font）．
（2）為實現上述功能，劃線①處應填入的代碼為．
（3）程序正確運行后，在文本框Text1中輸入701，并單擊“計算”按鈕．程序運行結果應為下圖中的（單選，填：A/B/C）．
組卷：11引用：2難度：0.5