2018-2019學年浙江省溫州市十五校聯盟聯合體高二（下）期末信息技術試卷
發布：2024/4/20 14:35:0
一、選擇題（本大題共12小題，每小題2分，共24分，每小題列出的四個備選項中只有一個是符合題目要求的，不選、錯選、多選均不得分）
-
1．下列有關信息的說法，不正確的是（ ）
組卷：11引用：1難度：0.6 -
2．下列關于網頁說法，不正確的是（ ）
組卷：4引用：1難度：0.6 -
3．下列選項中，體現人工智能技術的有（ ）
組卷：3引用：1難度：0.6 -
4．關于Access數據表的說法，下列說法正確的是（ ）
組卷：8引用：2難度：0.7 -
5．使用UltraEdit軟件查看字符“2019Happy”的內碼，部分界面如圖所示，下列說法正確的是（ ）
組卷：6引用：1難度：0.4
二、非選擇題（本大題共4題，其中第13題4分，第14題8分，第15題7分，第16題7分，共26分）
-
15．“楊輝三角”問題，如圖所示，其規律如下：其顯著特征是除斜邊上的1以外，其余數值均等于其肩部兩數之和。編寫VB程序，其功能如下：在文本框Text1中輸入20以內的整數，點擊“打印”按鈕，在列表框list1中輸出楊輝三角，程序界面如圖所示，VB程序代碼如下。
實現上述功能的VB程序如下，請回答下列問題：
（1）代碼“Private Sub Command1_Click （ ）”中的Command1_Click （ ）屬于（單選，填字母：A．對象名/B．屬性名/C．事件名/D．事件過程）。
（2）請在橫線處填入合適的代碼。
（3）若將加框處代碼改為“1 To i”，則（選填：會/不會）影響程序結果。
Private Sub Command1_Click （ ）
Dim a （20）As Long
Dim I As Integer,j As Integer,s As String
List1．Clear
n=Val（Text1．Text）
a（1）=1
List1．AddItem Str（a（1））
For i=2 To n
s=““
For j=
a（j）= ①
s=s+Str（a（j））
Next j
②
Next i
End Sub組卷：3引用：1難度：0.3 -
16．禮品分配問題：某班得到一件精美禮品，由于只有一件禮品，大家決定用下面方法來分配該禮品：n個同學圍成一圈，按順序從1到n進行編號。從第1個人開始報數，報到m的人退出，下一個人繼續從1開始報數，報到m的人出圈……，如此依次進行，直到留下的最后一個人得到該禮品。程序運行界面如圖所示，單擊“開始”按鈕，將輸出退出圈子的同學編號以及最后獲得獎品的編號。
實現上述功能的VB程序如下，請回答下列問題。
（1）當班級總人數n=15，m=5的時候，獲得禮品的同學編號是（填寫數字）。
（2）在橫線處填入合適的代碼。
Private Sub Command1_Click （ ）
Dim i As Integer,n As Integer,m As Integer
Dim num As Integer,t As Integer
Dim a（1 To 100）As Boolean
n=Val（Text1．Text）
m=Val（Text2．Text）
For i=1 To n
a（i）=True
Next i
①
Do While t＞1
For i=1 To n
If a（i）=True Then ②
If num=m Then
③
t=t-1
num=0
Text3．Text=Text3．Text+Str（i）
End If
Next i
Loop
For i=1 To n
If a（i）=TrueThen Label2．Caption=“獲得禮品同學編號：“+Str（i）
Next i
End Sub組卷：3引用：1難度：0.4