云南省昭通市镇雄县2022-2023学年高一上学期信息技术期末考试试卷

试卷更新日期:2023-03-22 类型:期末考试

一、选择题

  • 1. “猴子吃桃”问题:一天,一只猴子从树上摘下若干个桃子,当即吃了一半,觉得不过瘾,又吃了一个。第二天这只猴子接着吃剩下的一半,还觉得不过瘾,又吃了一个。以后它每天都吃前一天剩下的一半再多吃一个。到第四天,猴子按规则吃完桃子后,只剩一个桃子。问猴子第一天摘了多少个桃子。下图所示是根据分析所画出的部分流程图。采用倒推法,其中设定M 的初始值为1(第四天吃完后剩下的桃子数),D 为天数(初始值为5)。流程图中相应空缺位置①②处应分别填写(  )

    A、M=M*2+1 D=1 B、M=M*2+1 D<1 C、M=2*(M+1) D=1 D、M=2*(M+1) D<1
  • 2. 以下术语中表示文件传输协议的是(    )
    A、SMTP B、HTTP C、IT D、FTP
  • 3. 最新消息:全国信息安全标准化技术委员会日前明确要求,网联汽车采集数据不得在境外存储。这说明(   )。
    A、在境内存储方便,便于随时调用 B、数据安全上升为国家战略层面 C、在境外存储需要向相关机构支付不菲的存储费用 D、支持国内企业的数据存储业务
  • 4. 随着现代信息技术的发展,出现了很多新型的电子产品,如智能眼镜、智能手表等等。下列说法中,不符合信息技术发展趋势的是(   )   
    A、性能和价格越来越高 B、操作方式越来越简单 C、功能设计越来越个性 D、人机交互越来越友好
  • 5. 有如下VB程序段:

    For i=2 to 5

      For j=i to 5

        If j mod i=0 then a(j)=a(j)+1

      Next j

    Next i

    For i=1 to 5

      If a (i)<>1 then s=str(i)+s

    Next i

    若数组a 的初始值都为0,则运行该程序段后,s的值为(    )

    A、2 3 5 B、1 4 C、5 3 2 D、4 1
  • 6. 冯诺依曼型体系结构的计算机中引进了两个重要的概念,它们是(    )。
    A、引入CPU和内存器的概念 B、采用二进制和存储程序的概念 C、机器语言和十六进制 D、ASCII编码和指令系统
  • 7. 某单位的域名为:sdjxyj.net,其网址(URL)的完整写法是(    )
    A、www.sdjxyj.net B、http://www.sdjxyj.net C、ftp://www. sdjxyj.net D、telnet:// www. sdjxyj.net
  • 8. 李明通过电子邮件给远在美国的父亲成功发送了一张贺卡,在他父亲没有接收邮件之前,该电子邮件将(  )
    A、退给李明 B、保存在邮件服务器上 C、开机时重新发送 D、丢失
  • 9. 二进制数11101与十进制数2相加的结果是(  )
    A、(11110)2 B、(10110)2 C、(10101)2 D、(11111)2
  • 10. 下列关于Excel的叙述,错误的是(   )
    A、Excel能用图表的形式对数据进行分析和处理 B、Sum(A3:E3)等价于Sum(A3,B3,C3,D3,E3) C、Average(A1:C2)是对A1,B1,C1,A2,B2,C2六个单元格中的数据求平均值 D、Count函数的作用是计算所选数字区域中的最大值
  • 11. 为了保证计算机中的信息的安全,除了防范计算机病毒和黑客的非法攻击,还必须要做到(   )
    A、不使用任何移动存储介质 B、不在计算机上玩游戏 C、及时进行数据备份 D、不接入因特网
  • 12. 严格的密码策略不包括(       )
    A、满足一定的长度,比如8位以上 B、同时包含数字,字母和特殊字符 C、系统强制要求定期更改密码 D、用户可以设置空密码
  • 13. 在VB中,下列程序段执行后,变量b和变量c的值分别是 (   )

    a=23:b=18:c=0

    a=a+b

    b=a+b

    c=a+b

    A、41  41 B、41  64 C、59  59 D、59  100
  • 14. 全文搜索引擎中的索引器是负责哪项工作:(      )
    A、负责发现与收集网页 B、对所收集到的信息进行提取和组织,并建立索引库 C、面向用户,接收用户提交的查询字串,在索引数据库中查询,并将结果反馈给用户
  • 15. 有如下Visual Basic程序段:

    a = 9

    b = "Command Button"

    c = Len(b)

    If a > 0 And a < c Then

        Label1.Caption =Mid(b,a,6)

    Else

        Label1.Caption = "error"

    End If

    该程序段运行后,在标签Label1上显示的是(   )

    A、error B、6 C、Button D、Command
  • 16. 在Excel中创建图表以后发现工作表中的数据有错误,需要对图表进行修改,应该(   )
    A、先修改工作表中错误的数据,再修改图表中的相关数据点 B、先修改图表中错误的数据点,再修改工作表中的相关数据 C、对工作表中的错误数据进行修改,图表会自动更新 D、对图表中错误的数据点进行修改,工作表会自动更新
  • 17. 机器指令与微指令之间的关系是(  )。
    A、用若干条微指令实现一条机器指令 B、用若干条机器指令实现一条微指令 C、用一条微指令实现一条机器指令 D、用一条机器指令实现一条微指令
  • 18. 计算机病毒具有危害性,可能会造成对计算机资源的消耗或破坏,甚至有可能造成社会性灾难。预防病毒需要(   )
    A、定期做好资料的备份,以免造成不必要的损失 B、使用通讯工具时,对网友发来的文件应立即接收 C、收到邮件时,如有链接及附件可立即打开 D、不管什么情况,都禁止U盘的自动运行功能
  • 19. 以下属于“计算机”窗口控制菜单中的选项有(      )
    A、还原 B、移动 C、大小 D、最小化
  • 20. 下图是杭州二中环保调查小组所制作的废旧电器回收WORD文档中的部分界面截图,文中漫画图片使用的环绕方式为(   )

    A、四周型环绕 B、紧密型环绕 C、上下型环绕 D、穿越型环绕
  • 21. 语言处理程序分为(    )
    A、汇编程序 B、源程序 C、解释程序 D、编译程序
  • 22. 下列不属于信息的是(   )
    A、上课的铃声 B、收到的开会通知 C、存有照片的数码照相机 D、电视里播放的汽车跌价信息
  • 23. 据新闻报道,在杭州召开的G20峰会上,将全面部署5G网络,其中“5G”指的是(  )
    A、第5代移动通信技术 B、手机存储容量为5GB C、手机CPU 主频为5GHz D、手机上网带宽最大为5G
  • 24. Windows 98 是一种(    )。
    A、应用软件 B、图形化的操作系统 C、计算机语言 D、文字处理系统
  • 25. 关于电子邮件,错误的描述是(    )。
    A、可同时向多个收件人发送同一份电子邮件   B、电子邮件的内容是绝对安全可信的 C、电子邮件是病毒传播的一种途径 D、电子邮件发送时,接收方如果不在线,邮件同样可以发送

二、填空题

  • 26. 存储器分为
  • 27. 在Excel的图表中,能反映出数据变化趋势的图标类型是
  • 28. 已知大写字母“J”的ASCII码的二进制数是(1001010)2 , 大写字母“F” ASCII码的二进制数是
  • 29. 写出算法执行结果

    A=31415

    S=0

    Do while A>0

        s = s + A mod 10

        A= A\10

    Loop

    PRINT S

  • 30. VB表达式int(-3.1)的值是

三、操作题

  • 31. 星期天,小龙来到动物园游玩,园内共有N个景点(可在10个以上),每个景点都有一个标号,标号为1至N。现在只知道每个景点有一条路连接下一个景点。小龙想知道,根据这些道路信息,从其中一个景点出发,最后再回到出发景点,最多能游玩多少个景点。

    例如,共有N=5个景点,每个景点连接的下一个景点分别是2,4,5,5,2。

    景点号

    1

    2

    3

    4

    5

    下一景点号

    2

    4

    5

    5

    2

    则他可以从2号景点出发,最多可以游玩2号、4号、5号三个景点。

    程序代码如下:

    Private Sub Command1_Click()Dim a(1 To 100) As Integer, d(1 To 100) As Integer

        Dim jd As String, m As String, c As Integer, i As Integer

        Dim s As Integer, p As Integer, k As Integer, ans As Integer

        jd = Text1.Text + ","

        s = 0: c = 0

        For i = 1 To Len(jd)

            m = Mid(jd, i, 1)

            If m <> "," Then

                   ①    

            Else

                c = c + 1: a(c) = s: s = 0

            End If

        Next i

        ans = 0: k = 0

        For i = 1 To c

            For k = 1 To c

                d(k) = 0

            Next k

            If d(i) = 0 Then

                p = i

                Do While p <= c

                    If d(p) = 0 Then

                        k = k + 1: d(p) = k

                    Else

                                       

                    If y > ans Then ans = y

                        k = 0

                        Exit Do

                    End If

                   

                Loop

            End If

        Next i

        Text2.Text = Str(ans)

    End Sub

    (1)、要使程序运行时,Form1的BackColor属性值为黑色,以下代码正确的是(单选,填字母)。

    A .Private Sub Form_Load()Form1. BackColor = RGB(255, 255,255)

    End Sub

    B .Private Sub Form_Load()Form1.BackColor = RGB(0, 0, 0)

    End Sub

    C .Private Sub Form1_Load()orm1.BackColor = RGB(255,255,255)

    End Sub

    D .Private Sub Form1_Load()Form1.BackColor = RGB(0, 0, 0)

    End Sub

    (2)、若有7个景点,且每个景点的连接情况为:6,3,7,2,7,5,4,那么小龙最多可以游玩的景点数是
    (3)、请把划线处的代码补充完整:

    (4)、程序加框处代码有错,请改正:
  • 32. 现有一个大小为n*n的平面矩阵(从上到下从左到右编号为1~n*n),矩阵中有诸多障碍物。有两个机器人分别为1号和2号,其中1号位于左上角且面朝右侧,2号位于右下角且面朝左侧。现在机器人需要按照规则进行K轮运动,规则如下:

    ①1号和2号机器人需要交替运动,即第一轮由1号进行运动,第二轮则由2号进行运动,第三轮由1号进行运动……以此类推直至第K轮。

    ②每轮运动时,机器人将先判断前方是否可以前进,若无法前进,则不断顺时针旋转90°至可以前进为止,随后前进直至停止,由另一个机器人开始下一轮运动。

    ③机器人在前进过程中遇到边界、障碍物或者另一个机器人时都将停止。

    如图a所示,机器人1号和2号分别位于左上角和右下角,且分别朝向右侧和左侧,黑块表示障碍物,当进行了4轮运动后,状态如图b所示。

    编写程序,启动后随机生成矩阵并在List1中输出,其中"#"表示障碍物,"_"表示可以行走的空格子,机器人用数字1和2表示。在文本框Text1中输入轮数K,点击按钮Command1,在列表框List1中输出K轮后的矩阵。程序界面如图c所示。

    图a

    图b

    图c

    (1)、若在图a的基础上进行6轮运动后,1号机器人所在的位置是(填行列或格子编号均可)。
    (2)、实现上述功能的部分VB程序如下,请在划线处填入合适的代码。

    Const n = 10

    Dim a(100) As String, steps(3) As Integer, pos(2) As Integer

    Dim towards(2) As Integer, cur As Integer, nex As Integer, K As Integer

    Private Sub Form_Load()

        '生成矩阵存储在数组a中并输出,代码略

    End Sub

    Private Sub Command1_Click()

        steps(0) = -n: steps(1) = 1: steps(2) = n: steps(3) = -1

        pos(1) = 1: towards(1) = 1: pos(2) = n * n: towards(2) = 3

        i = 1 : K = Val(Text1.Text)

        Do While i <= K

            cur = (i - 1) Mod 2 + 1

            nex = GetNext(pos(cur), towards(cur))

            Do While Check(nex)

                pos(cur) = nex

                nex = GetNext(pos(cur), towards(cur))

            Loop

            nex = GetNext(pos(cur), towards(cur))

            Do While Not Check(nex)

                towards(cur) =

                nex = GetNext(pos(cur), towards(cur))

            Loop

            i = i + 1

        Loop

        '输出矩阵,代码略

    End Sub

    Function Check(x As Integer) As Boolean

        Check = x <> 0 And a(x) <> "#" And

    End Function

    Function GetNext(x, t) As Integer

        GetNext = x + steps(t)

        If x >= 1 And x <= n And t = 0 Then GetNext = 0

        If x > (n - 1) * n And x <= n * n And t = 2 Then GetNext = 0

        If Then GetNext = 0

        If x Mod n = 0 And t = 1 Then GetNext = 0

    End Function