2017-2018學(xué)年浙江省溫州新力量聯(lián)盟高二（上）期末信息技術(shù)試卷（選考）

一、選擇題（本大題共12小題，每小題2分，共24分，每小題列出的四個(gè)備選項(xiàng)中只有一個(gè)是符合題目要求的，不選、錯(cuò)選、多選均不得分．）

• 1．下列關(guān)于信息的描述不正確的是（　?。?/h2>

  A．信息可以被重復(fù)使用不會(huì)產(chǎn)生耗損

  B．無線電技術(shù)使信息可以不依附載體存在

  C．信息應(yīng)盡可能經(jīng)過甄別后再使用

  D．相同內(nèi)容的信息可以有多種不同的表達(dá)方式
  組卷：38引用：1難度：0.9

  解析

• 2．網(wǎng)頁中包含的文本、圖象、超鏈接和表格等基本元素及構(gòu)件是由（　?。┻M(jìn)行描述的。

  A．HTTP

  B．SMTP

  C．HTML

  D．WEB
  組卷：3引用：1難度：0.9

  解析

• 3．以下選項(xiàng)中，運(yùn)用了人工智能的是（　?。?/h2>

  A．用手機(jī)將練習(xí)冊(cè)上有疑問的試題拍攝后通過微信發(fā)給老師，并就試題內(nèi)容向老師請(qǐng)教

  B．在手機(jī)上設(shè)定鬧鐘叫醒自己

  C．利用微信語音聊天功能與朋友相互問候

  D．將微信上他人發(fā)來的語音轉(zhuǎn)換成文字
  組卷：13引用：1難度：0.9

  解析

• 4．小明為如圖所示的數(shù)據(jù)表提出了修改建議。以下建議中，當(dāng)前狀態(tài)下操作能實(shí)現(xiàn)的是（　?。?br />

  A．孫雯的入學(xué)時(shí)間格式有誤，建議輸入“2015/8/32”

  B．建議將序號(hào)字段的數(shù)據(jù)類型設(shè)置為“自動(dòng)編號(hào)”，可以節(jié)省輸入序號(hào)的時(shí)間

  C．建議將聯(lián)系電話字段的數(shù)據(jù)類型設(shè)置為“文本”

  D．建議將性別字段的類型改為“文本”，表中已有數(shù)據(jù)的性別將以“男”或“女”顯示
  組卷：23引用：1難度：0.7

  解析

• 5．某算法的部分流程圖如圖所示，執(zhí)行這部分流程后，下列說法正確的是（　?。?img alt="菁優(yōu)網(wǎng)" src="https://img.jyeoo.net/quiz/images/201803/34/9bfa661a.png" style="vertical-align:middle" />

  A．輸出的 a,b 值分別為 5，11

  B．輸出的 a,b 值分別為 5，14

  C．條件 b＜10 被判斷了 6 次

  D．語句 b←3*a-1 被執(zhí)行了 4 次
  組卷：1引用：1難度：0.7

  解析

二、非選擇題（本大題共5小題，其中第13小題4分，第14小題5分，第15小題8分，第16小題3分，第17小題6分，共26分）

• 16．小劉為班級(jí)的抽獎(jiǎng)活動(dòng)編寫了一個(gè) VB 程序。單擊“抽取”按鈕 command1 時(shí)，在列表框 List1 中顯示按用戶抽取人數(shù)在學(xué)號(hào)起訖范圍內(nèi)（最大學(xué)號(hào)不超過 100）隨機(jī)抽取到不重復(fù)的學(xué)號(hào)。程序運(yùn)行界面如圖所示。 
  
  實(shí)現(xiàn)上述功能的 VB 程序如下，但加框處代碼有錯(cuò)，請(qǐng)改正。 Dim xh（1To 100）As Integer
  Dim yx As Integer
  Private Sub Command1_Click

   

   Dim n1，n2，n,x As Integer List1．Clear
  Randomize
  n1=Val（Text1．Text） n2=Val（Text2．Text） n=Val（Text3．Text） If n＜=n2-n1Then
  yx=1
  Do While yx＜=n
  x='①
  If yx=1Then
  xh（yx）=x
  yx=2
  Else
  If qc（x）=True Then
  xh（yx）=x
  yx=yx+1
  End If
  End If
  Loop
  For i=1To n
  List1．AddItem Str（xh（i））
  Next i Else
  MsgBox“你輸入的抽取人數(shù)不能實(shí)現(xiàn)，請(qǐng)重新輸入?！癊nd If
  End Sub
  Public Function qc（t As Integer） As Boolean For j=1To yx
  If xh（j）=t Then
  qc=False
  Exit For
  End If Next j
  If  Then qc=True'②End Function
  （1）加框處①有錯(cuò)，應(yīng)改為

   

  。
  （2）加框處②有錯(cuò)，應(yīng)改為

   

  。
  組卷：6引用：1難度：0.3

  解析

• 17．在一個(gè)長度為 n 的數(shù)字序列中，如果相鄰元素差的絕對(duì)值經(jīng)過升序排序后正好是 1 到 n-1，則認(rèn)定該序列存在著“有趣的跳躍”。例如：數(shù)字序列 1、4、2、3 的相鄰數(shù)字差的絕對(duì)值分別為 3、2、1，排序后是 1、2、3，則說明該序列存在著“有趣的跳躍”。
  小明編寫了 VB 程序用于數(shù)字序列的檢測(cè)，程序運(yùn)行界面如圖所示。在文本框 Text1 中逐個(gè)輸入數(shù)字，依 次存儲(chǔ)到數(shù)組 a 中，并在列表框 List1 中顯示。單擊“判斷”按鈕 Command1，將原始數(shù)字序列相鄰數(shù)字差 的絕對(duì)值依次存儲(chǔ)到數(shù)組 b 中，并對(duì)數(shù)組 b 進(jìn)行升序排序后在列表框 List2 中顯示；若輸入的數(shù)字序列存在“有趣的跳躍”，則在文本框 Text2 中輸出“yes”，否則輸出“no”。
  （1）若輸入序列 3、13、24、35、47、30，單擊“判斷”按鈕后，文本框 Text2 中將顯示

   

  。
  （2）實(shí)現(xiàn)上述功能的 VB 程序如下，請(qǐng)?jiān)跈M線處填入合適代碼。Dim n As Integer'存儲(chǔ)序列的元素個(gè)數(shù)
  Dim a（1To 100）As Integer'存儲(chǔ)原始數(shù)字序列
  Dim b（1To 100）As Integer'存儲(chǔ)相鄰數(shù)字的差值絕對(duì)值 Private Sub Form_Load （　?。?br />n=0End Sub
  Private Sub Text1_KeyPress（KeyAscii As Integer） If KeyAscii=13Then
  n=n+1
  ①
  List1．AddItem str（a（n）） Text1．Text=““
  End If End Sub
  Private Sub Command1_Click （　?。?br />Dim i As Integer,j As Integer,k As Integer,m As Integer Dim flag As Boolean
  m=n-1
  For i=1To m
  b（i）=②
  Next i
  For i=2To m k=b（i）
  For j=i-1To 1Step-1
  If k＞b（j） Then Exit For b（j+1）=b（j）
  Next j
  ③=k
  Next i flag=True
  For i=1To m List2．AddItem str（b（i））
  If b（i）＜＞i  Then flag=False Next i
  If flag=True Then Text2．Text=“yes“Else Text2．Text=“no“End Sub
  組卷：8引用：1難度：0.1

  解析