浙江省温州十五校联合体2019-2020学年高二上学期信息技术期中联考试卷

年级: 学科:信息技术(信息科技) 类型:期中考试 来源:91题库

一、选择题 (共12小题)

1、有一幅8×8像素的黑白图像,如下图所示。如果该图像的每一行按照从左到右编码,且第一行编码为10010010,那么第三行的编码是(  )

A . 11010101 B . 01010001        C . 10101110 D . 00101010
2、有关信息和信息技术,下列说法正确的是(  )
A . 网页里的图片和文字都属于信息 B . 某单位发布的虚假广告不属于信息 C . 同一信息只能依附于一种载体 D . 信息经加工处理后可以具有更高的价值
3、下列有关计算机网络术语的说法,正确的是(  )
A . SMTP协议用于发送电子邮件 B . HTTP是超文本标记语言 C . HTML是超文本传输协议 D . WWW的中文含义是互联网
4、网络用户对某网络店铺投票结果如下图所示:

该过程中采用的评价方法有(  )

A . 专家评价、个人推荐 B . 个人推荐、统计评价 C . 个人推荐、网络预测 D . 网络预测、专家评价
5、2017年爆发的“勒索病毒”攻击电脑并加密电脑中的文件,然后要求支付赎金。下列关于“勒索病毒”的说法,正确的是(  )
A . “勒索病毒”是人为编制的一种计算机软件 B . 受感染者应尽快交纳赎金,以避免文件受到进一步的损坏 C . 先不要打开电脑,过段时间病毒被消灭了,再使用电脑 D . 用户应以主动防御为主,升级杀毒软件并查杀,同时做好数据备份
6、使用Word软件编辑某文档,部分界面如图所示。下列说法正确的是(  )

A . 有一处批注,批注的内容是“一带一路” B . 若删除文中的批注,则批注对象也将被删除 C . 该批注的用户名缩写是x,1表示是第一处批注 D . 拒绝所有修订后,第四行文字是“合作成果的国际全球盛会……”
7、下列应用中,体现了人工智能技术的有(  )

① 通过在线翻译网站把英文翻译成中文

② Excel软件中的“自动填充”功能

③“AlphaGo”围棋程序与人类对弈

④ 使用手机扫描二维码进行支付

⑤ 通过指纹解锁功能解锁手机界面

A . ①③⑤ B . ①②④ C . ②③⑤ D . ②③④
8、使用OCR软件进行文字识别,部分界面如图所示,则下列说法正确的是(  )

A . 当前已经识别了3张图片 B . 当前可对②处的内容进行编辑 C . ①处的内容为“Yunnan_simp.TXT”中的内容 D . 在③处单击“0国”字样可将①处的“园”字替换成“0国”
9、使用Access软件打开数据库,部分界面如图所示。

下列说法正确的是(  )

A . 可新增名为“价格”的字段 B . “有无光盘”字段为“是/否”类型 C . 该数据库名称是“图书信息.accdb” D . 可在“书号”为2的记录前插入新记录
10、下列关于信息表达方式与表达技术的说法,正确的是(  )
A . 哑语是一种信息表达方式 B . 同一信息只有一种表达方式 C . 文字是常用的信息表达技术 D . 网络技术是一种信息表达方式
11、某算法的部分流程图如图所示,输出值s为(  )

A . 4 B . 9 C . 16 D . 25
12、VB表达式: Sqr(Abs(Int(-8.2)))+ 32 mod 10 \ 3的结果是(  )
A . 5 B . 4 C . 3 D . 2

二、填空题 (共4小题)

1、小王使用Access和Excel软件对艺术节的参评项目进行数据收集、处理和分析。设计的表结构及收集到的数据分别如图a、图b所示。请回答以下问题:

(1)当前状态下在设计视图中,      (选填:能 / 不能)添加一个数据类型为“自动编号”的字段。
(2)当前状态下,添加一个班级的艺术节项目得分信息,新记录是第      条记录。
(3)将Access中的“2019艺术节”数据表导出到Excel并统计分析,界面如图c所示:

初中组各班的总得分通过在 H3单元格输入“=SUM(C3:G3)”,并将其自动填充至 H4:H11得到。现复制 H11单元格,粘贴到H13单元格,      (选填:能 / 不能)正确计算高中组二 1班总得分。

(4)如图c所示,初中组各班的名次通过对I3自动填充得到,但结果有误。自动填充前,I3单元格中的公式应修改为      。(说明:RANK函数可以根据数值大小进行排名。如公式“=RANK(A1,A1:A5)”可以得出A1单元格中的数值在 A1:A5范围里的降序排名结果。)
(5)若要对初中组按“立体造型”的得分进行降序排序,排序的数据区域为      
(6)如图d所示为排序前建立的图表,经过第(5)小题操作后,图表内容      (选填字母:A.会 / B.不会)

(7)在图c所示的数据中,对“合唱”设置如图e所示的筛选条件后,将显示      个班级的信息。

(8)要将标题“艺术节选送项目得分情况”在表格A至I列居中,选中 A1:I1区域后进行      操作。
2、编写“提取数字”程序,实现如下功能:在文本框Text1中输入文本信息,点击“提取”按钮Command1,将文本信息中的数字以“,”间隔输出到文本框Text2中。程序运行界面如图所示。

(1)观察界面,程序中未使用到的控件是      (填字母:A . /B . / C . / D .   )
(2)根据题意,请将划线处代码补充完整。

Private Sub Command1_Click()

  Dim zf As String, tmp As String

  Dim s As String, i As Integer, ch As String

        

  tmp = ""

  s = ""

  For i = 1 To Len(zf)

    ch = Mid(zf, i, 1)

    If ch >= "0" And ch <= "9" Then

            

    ElseIf tmp <> "" Then

      s = s + tmp + ","

      tmp = ""

    End If

  Next i

 

  Text2.Text = s

End Sub

(3)当输入的文本信息如图所示,若删除加框代码,则文本框Text2中显示的内容为      
3、查找最大的ASCII码字符。随机生成n(n>=40)个可见ASCII码的字符串(可见字符ASCII码的范围是33~126),并显示在文本框Text1中。单击“查找”按钮运行程序,在标签Label1中输出该字符串中最大的ASCII码值及对应的字符。程序界面如图所示,VB代码如下。请回答下列问题:

(1)要使程序运行时,窗体Form1标题显示“查找ASCII最大的字符”,则需在Form_Load事件过程中添加语句      (单选,填字母:A .Form1.Text="查找ASCII最大的字符" / B .Form1.Caption=

"查找ASCII最大的字符"/  C .Form1.AddItem "查找ASCII最大的字符")

(2)实现上述功能的VB程序如下,请在划线处填入合适代码。

Const n = 40

Private Sub Command1_Click()

  Dim s As String, ch As String

Dim i As Integer, max As Integer

  s = Text1.Text

  max = 0

  For i = 1 To Len(s)

      ch =       

      If Asc(ch) > max Then max = Asc(ch)

  Next i

  Label1.Caption = "最大ASCII码:" +        + " 该字符为:" + Chr(max)

End Sub

Private Sub Form_Load()   ’随机生成可见字符并显示在文本框Text1中

  Randomize

  For i = 1 To n

    Text1.Text = Text1.Text +       

  Next i

End Sub

4、袜子颜色配对问题。现有不同颜色的袜子若干(袜子的颜色用数字编号1~15表示),颜色相同的袜子才能组成一双,其中有几只袜子是落单的,现要求找出落单袜子的颜色以及能够配对的袜子数量。编写程序解决该问题,程序运行时,在文本框Text1中依次输入袜子的颜色编号(数据都用逗号分隔并以逗号结尾),单击“查找”按钮,在列表框List1中输出落单袜子的颜色编号,在标签label1中现实能配对的袜子数量。运行界面如图所示,实现上述功能的VB程序如下。

Const n = 15

Private Sub Command1_Click()

  Dim a(1 To n) As Integer  '数组a存放不同颜色袜子的数量,默认值为0

  Dim s As String, ch As String

  Dim c As Integer, i As Integer, t As Integer

    List1.Clear

    s = Text1.Text

    t = 0 :c = 0 : i = 1

    Do While i <= Len(s)

        ch = Mid(s, i, 1)

        If ch >= "0" And ch <= "9" Then

            t = t * 10 + Val(ch)

        Else

            a(t) =   ①  

            t = 0

        End If

        i = i + 1

    Loop

    For i = 1 To n

        If   ②    Then List1.AddItem "落单袜子的颜色为" + Str(i)

        c =

    Next i

    Label1.Caption = "能配对的袜子有" + Str(c) + "双"

End Sub

请回答下列问题:

(1)写出VB代码中的方法名      (只需填一个方法名);
(2)根据题意,请在划线处填入合适代码;

       ②       

(3)加框处程序代码有错,请改正。
1. 本站所有内容未经许可不可转载!
4. 试卷库 > 浙江省温州十五校联合体2019-2020学年高二上学期信息技术期中联考试卷

说明

1、直接打印:比较直观,基本上所见即所得;
2、导出word:可以下载来编辑,样式需微调,可修改;
3、在线答案:包含了题目和答案,低碳环保,推荐!
4、只看答案:只有答案及解析,页面较少;