浙江省湖州市三贤联盟2020-2021学年高二上学期信息技术期中联考试卷

修改时间:2024-07-31 浏览次数:135 类型:期中考试 编辑

选择试卷全部试题 *点击此按钮,可全选试卷全部试题,进行试卷编辑

一、选择题部分(本大题共12小题,每小题2分,共24分)

  • 1. 下列有关信息说法正确的是(    )
    A . 文字、语言、声音、书籍等都是常见的信息表达方式 B . 信息是指对消息接收者来说预先不知道的事情,因此具有不确定性 C . 只有数字化后的信息才能被计算机处理 D . “以讹传讹”这个成语说明了信息在传递过程中会产生损失
  • 2. 下列说法错误的是(    )
    A . 传感器技术已经在智能手机中广泛使用 B . 云技术的发展为信息脱离载体传输提供了可能性 C . 电影技术属于近代信息技术 D . 使用加密技术可以提高信息的安全性
  • 3. 关于浏览器和网页的说法,正确的是(    )
    A . 利用收藏夹可将网页保存到本地磁盘 B . 文字、表格和超链接是网页内容的三种基本元素 C . POP3协议的功能是把电子邮件从发件人电子信箱发送到收件人的电子邮件服务器中 D . 网页文件是由HTML语言描述的文本文件,可以用记事本编辑
  • 4. 以下行为中采用人工智能技术的有(    )

    ①烟雾报警器自动报警

    ②通过外接手写板,在电脑中输入文字

    ③在word中输入“强建”,自动更改为“强健”

    ④小区门口自动识别车牌号进行播报

    ⑤购物者携带钉有“磁性防盗扣”的商品经过防盗门时,会自动报警

    ⑥老师用钉钉群直播上课

    A . ①⑤④ B . ②③④ C . ④⑥ D . ②④
  • 5. 使用Word软件编辑某文档时,部分界面如图所示:(    )

    下列说法正确的是(    )

    A . 图中图文混排方式一定是四周型 B . 用户A1和B2分别对文档进行了批注 C . 文档中有两处批注、两处修订 D . 若删除文中的批注,则批注对象也会被删除
  • 6. 利用OCR软件进行识别,如下图:(    )

     

    以下说法正确的是(    )

    A . 版面分析不会影响识别的正确率 B . 选中相似字候选区中的“4”,会使B区域的“作”更改为“佳” C . 图中已有2个文件被识别,且“诺贝尔生理学或医学奖.TXT”的容量比“诺贝尔生理学或医学奖.jpg”容量小 D . 可以手动将A区域中的“830”修改为“18:30”
  • 7. 下列VB表达式的值最大的是(    )
    A . Val(mid(“20201008”,3,1) B . Int(sqr(18))+2 C . Len(“4+5”) D . 127 Mod 20\2
  • 8. 有如下流程图,输入X、Y分别为7和4,执行后S的值为(    )
    A . 38 B . 51 C . 52 D . 66
  • 9. 有如下VB程序段:

    b=0

    For a=1 to 10

        b=a+b

    Next a

    c=a+b

    执行该程序段后,变量c的值为(    )

    A . 55 B . 66 C . 65 D . 20
  • 10. 以下函数可以产生[1,10]之间的随机偶数的是(    )
    A . Int(Rnd*9+2)  B . Int(Rnd*10+1)  C . Int(Rnd*5)*2+1  D . Int(Rnd*5+1)*2
  • 11. 有如下VB程序段:

    Private Sub Command1_Click()

        Dim s As String, ch As String

        Dim n As Integer, t As Integer, c As Integer

        s = "Go-2020-12"

        n = Len(s):t = 0

        For i = 1 To n

            ch = Mid(s,i,1)

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

                t = t + Val(ch)

            Else

                c = t: t = 0

            End If

        Next i

        Label1.Caption = Str(c)

    End Sub

    执行完以上程序段后,标签Label1上显示的内容为(    )

    A . 7 B . 2 C . 3 D . 4
  • 12. 有如下VB程序段:

    Private Sub Command1_Click()

        Dim i As Integer

        Dim x As Integer

        Dim s As String

        Randomize

        i = 1: s = "1"

        Do While i <= 6

            x = Int(Rnd * 9) + 1

            If x Mod 2 = i Mod 2 Then

                s = s + Str(x)

                i = i + 1

            End If

        Loop

        Label1.Caption = s

    End Sub

    运行程序后,标签Label1中可能出现的是(    )

    A . 1 8 3 4 5 2 B . 1 9 4 3 7 5 6 C . 1 9 4 7 6 5 2 D . 1 8 1 2 7 6 1

二、非选择题部分(本大题共4题,6+6+7+7,共26分)

  • 13. 某地区进行了三个类别的教师招聘,并用EXCEL软件进行处理,如图a所示。

    (1) 总分是将“笔试”成绩和“面试”成绩分别乘以对应的权重相加所得。通过E3单元格的公式,对E4:E32进行自动填充,E4单元格中显示的结果是。(单选,填字母:A .#DIV/0! / B .#REF / C .0.00 / D .76.55)若要通过该公式能正确自动填充到E4:E32,则E3单元格的公式应改为
    (2) 根据图a中数据制作的图表如图b所示,创建该图表的数据区域是

    从1图b到图c可通过设置图d中(填字母A/B/C/D)得到。

    (3) 为了获得小学音乐类别中总分最高的准考证号(若存在符合条件的多个准考证号,则全部选取)。下列方法可行的是            (多选,填字母)
    A . 以“报考职位”为小学音乐进行筛选,再以“总分”为关键字降序排序,选取排在最前面的记录。 B . 以“报考职位”为主要关键字,以“总分”为次要关键字,均按降序排序,选取排在最前面的记录。 C . 以“报考职位”为小学音乐进行筛选,再以“总分”为最大的一项进行筛选,然后选取筛选后的记录。 D . 以“总分”为关键字进行降序排序,再以“报考职位”为小学音乐进行筛选,选取排在最前面的记录。
  • 14. 使用Access软件打开数据库,部分界面如下图所示。

    (1) 当前状态下(可以/不可以)对数据表“经典灾难片”重命名为“电影”。
    (2) 当前数据表可以通过(选择上图的A或B)导出到EXCEL表格中,其中字段“ID”为7记录的“重放”字段值为
    (3) 当前状态下,添加一个片名为“我和我的家乡”的电影相关信息。新记录是第条记录。
    (4) 当前数据表中,“片长”字段可能的数据类型为         。(多选,填字母)
    A . 自动编号 B . 文本 C . 数字 D . 备注 E . 日期/时间
  • 15. 某仓库对货物的编码规则为:货物类型(4-8位英文字母)货物编码(4-8位数字)货物校验码。货物编码的每一位数除以2产生的余数,倒序输出即是货物正确的校验码,现编写如下VB程序,如图在Text1中输入货物完整编码后,判定校验码是否符合标准,并在Label1中输出结果。

    (1) 由程序可知,此程序中按钮的名称为
    (2) 请在划线处填入合适的代码。

    Private Sub check_Click()

        Dim s as string, ss as string, s1 as string, s2 as string

        Dim i as integer, bz as integer

       

        bz = 0

        For i = 1 To Len(s)

            ss = Mid(s, i, 1)

            If ss = "-" Then

                bz = bz + 1

            ElseIf bz = 1 Then

                s1 = CStr() + s1      ‘Cstr函数是在str的基础上去除前导空格

            ElseIf bz = 2 Then

                s2 = s2 + ss

            End If

        Next i

        If  Then

            Label1.Caption = "符合标准"

        Else

            Label1.Caption = "不符合标准"

        End If

    End Sub

  • 16.   在Text1中输入一个1-26之间的数字n,点击“产生”按钮,在Text2中产生n个不重复的大写字母,中间用逗号隔开(图a),点击一次“最小值”按钮,Text2中最小的字母会掉落到List1中,并将Text2中对应的字母和后面的逗号删除(图b),再点击一次“最小值”按钮,剩余字母中的最小值继续掉落(图c)。(ASC(“A”)=65,CHR(65)=“A”)

    (1) 根据描述,如产生的字母为“H,K,C,B,N,”,第三次点击“最小值”按钮后Text2中显示内容为
    (2) 请在划线处填入合适的代码。

    Private Sub Command1_Click()

        Dim i As Integer, j As Integer, n As Integer

        Dim zm As Integer, flag As Boolean, zf As string

        Randomize       ‘重置rnd函数,确保每次产生的随机数不一致

        zf = ""

        n = Val(Text1.Text)

        For i = 1 To n

           

            zm = Int(Rnd * 26 + 65)

            For j = 1 To Len(zf) Step 2

                If Asc(Mid(zf, j, 1)) = zm Then

                   

                    flag = True

                    Exit For

                End If

            Next j

            If flag = False Then zf = zf + Chr(zm) + ","

        Next i

        Text2.Text = zf

    End Sub

    Private Sub Command2_Click()

        Dim i As Integer, zf As string

        zf=Text2.Text

        k = 1

        For i = 3 To Len(zf) - 1 Step 2

            If Mid(zf, k, 1) > Mid(zf, i, 1) Then k = i

        Next i

        List1.AddItem Mid(zf, k, 1)

        Text2.Text =

    End Sub

试题篮