2017年浙江省溫州市普通高中選考模擬信息技術(shù)試卷（2月份）

一、選擇題（共12小題，每小題2分，滿分24分）

• 1．某用戶使用手機(jī)“導(dǎo)航”軟件，從 A 地駛向 B 地，規(guī)劃路線后開始行駛，途中“導(dǎo)航”提醒前 方道路擁堵，建議改變路線，并實(shí)時(shí)提供新的導(dǎo)航路徑，該事例體現(xiàn)信息的（　?。?/h2>

  A．載體依附性

  B．真?zhèn)涡?/label>

  C．共享性

  D．時(shí)效性
  組卷：23引用：7難度：0.9

  解析

• 2．小春用 Word 軟件撰寫了一篇觀后感，經(jīng)老師審閱后文檔的部分截圖如圖所示，下列描述 正確的是（　?。?br />

  A．拒絕所有修訂后，文檔內(nèi)容為“《開學(xué)第 1 課》2016 年 9 月 1 日晚上 8 點(diǎn)在 CCTV 首播”

  B．拒絕所有修訂后，文檔內(nèi)容為“《開學(xué)第 1 課》于 2016 年 9 月 1 日晚上 8 點(diǎn)在中央電視臺(tái)首 播”

  C．接受所有修訂后，文檔內(nèi)容為“《開學(xué)第一課》于 2016 年 9 月 1 日晚上 8 點(diǎn)在中央電視臺(tái)首 播”

  D．接受所有修訂后，文檔內(nèi)容為“《開學(xué)第一課》于 2016 年 9 月 1 日晚上 8 點(diǎn)在中央電視臺(tái)CCTV 首播”
  組卷：12引用：6難度：0.9

  解析

• 3．下列應(yīng)用中，沒有運(yùn)用人工智能的是（　?。?/h2>

  A．使用翻譯軟件進(jìn)行中英互譯

  B．使用掃描儀對(duì)雜志封面進(jìn)行掃描

  C．使用語音輸入法進(jìn)行文字錄入

  D．使用 OCR 對(duì)圖片文件中的文字進(jìn)行識(shí)別
  組卷：8引用：7難度：0.9

  解析

• 4．有一 Access 數(shù)據(jù)表，其設(shè)計(jì)視圖如圖1所示，數(shù)據(jù)表如圖2所示，下列說法正確的是（　?。?br />

  A．當(dāng)前數(shù)據(jù)表的表名為“外幣儲(chǔ)備．a(chǎn)ccdb”

  B．該表一共有 37 條記錄，當(dāng)前記錄為第 33 條

  C．刪除“2014年”字段后，“總計(jì)”字段中的各字段值不發(fā)生變化

  D．“排名”字段的字段類型可以更改為“自動(dòng)編號(hào)”類型，且字段值不會(huì)改變
  組卷：8引用：5難度：0.9

  解析

• 5．某算法部分流程圖如圖所示，執(zhí)行該部分流程圖后，變量 s 和變量 i 的值分別為（　?。?br />

  A．9 和 5

  B．9 和 7

  C．16 和 5

  D．16 和 7
  組卷：13引用：9難度：0.7

  解析

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

• 16．小王編寫 VB 程序，功能如下：在文本框 Text1 中輸入一段英語短文，點(diǎn)擊“統(tǒng)計(jì)”按鈕 Command1，在標(biāo)簽 Label2 中輸出該短文中出現(xiàn)次數(shù)最多的小寫字母、次數(shù)和頻率（若有 多個(gè)，則全部輸出），程序運(yùn)行界面如圖所示．
  
  若實(shí)現(xiàn)上述功能的程序如下，請(qǐng)?jiān)诩涌蛱幮薷暮线m代碼，使程序正常運(yùn)行． 
  Private Sub Command1_Click （　?。?br />Dim i As Integer,n As Integer,f As Integer
  Dim max As Integer'變量 max 表示出現(xiàn)最多的字母
  Dim sum As Integer'sum 表示字母總數(shù)
  Dim zm（1To 26）As Integer'數(shù)組 zm 存放 26 個(gè)字母出現(xiàn)的次數(shù) 
  Dim s As String,c As String
  Dim cx As String'變量 cx 存放次數(shù)最多的字符 
  s=Text1．Text
  For i=1To Len（s） 
  c=Mid（s,i,1）
  If c＞=“a“And c＜=“z“Then n=
  zm（n）=zm（n）+1
  sum=sum+1
  End If
  Next i  
  max=0
  For j=1To 26
  If zm（j）＞max Then ：cx=““
  If zm（j）=max Then
  cx=cx+““+Chr（Asc（“a“）+j-1）
  End If
  Next j
  f=Int（max/sum*100）
  Label2．Caption=“字母：“& cx &“次數(shù)：“& max &“頻率：“& Str（f） &“%“
  End Sub.
  組卷：6引用：3難度：0.1

  解析

• 17．小李編寫 VB 程序，功能如下：單擊“生成數(shù)組”按鈕 Command1，則隨機(jī)生成 13 個(gè)取值范圍是 1～13 的正整數(shù)，分別存儲(chǔ)到數(shù)組 a 中，對(duì)數(shù)組 a 的元素進(jìn)行升序排列，并在標(biāo)簽label1 中顯示；再單擊“連續(xù)數(shù)”按鈕 Command2，則在排序后的數(shù)組 a 中查找連續(xù)個(gè)數(shù)最多（忽略重復(fù)數(shù)值）的一組數(shù)值（即：連續(xù)數(shù)），若有兩組連續(xù)數(shù)個(gè)數(shù)一樣多，則取數(shù)值小的一組，將連續(xù)數(shù)顯示在標(biāo)簽 label2 中．運(yùn)行界面如圖所示．
  
  若實(shí)現(xiàn)上述功能的程序如下，請(qǐng)?jiān)趧澗€處填寫合適代碼，使程序正常運(yùn)行．
  Dim a（1To 13）As Integer
  Dim n As Integer
  Private Sub Command1_Click （　　）
  Dim i As Integer,s As String,j As String
  Randomize
  n=13
  For i=1To n
  a（i）=Int（Rnd*13）+1
  Next i
  For i=1To n-1
  For j=i+1To n
  If a（j）＜a（i） Then
  t=a（j）： ①：a（i）=t
  End If
  Next j
  Next i
  s=““
  For i=1To n
  s=s+Str（a（i））
  If   ② Then s=s+“，“
  Next i
  Label1．Caption=s
  End Sub
  Private Sub Command2_Click （　?。?br />Dim i As Integer,j As Integer
  Dim t As Integer,k As Integer
  Dim max As Integer'存儲(chǔ)連續(xù)數(shù)個(gè)數(shù)最大值
  Dim begin As Integer'存儲(chǔ)連續(xù)數(shù)開始的數(shù)值
  k=1
  max=1
  For i=2To 13
  If a（i）=a（i-1）+1Or a（i）=a（i-1）Then
  If   ③ Then k=k+1
  If k＞max Then
  max=k
  begin=  ④
  End If
  Else
  k=1
  End If
  Next i
  s=““
  For j=begin To begin+max-1
  s=s+Str（j）
  Next j
  Label2．Caption=s
  End Sub.
  組卷：6引用：2難度：0.1

  解析