高中信息技术:

高中 信息技术

在Excel中,求两个单元格区域A4:E9与B5:D10相交的单元格区域内各数值的平均值,采用相对地址引用,应该表示为(  )。
A . AVERAGE(A4:E9,B5:D10) B . AVERAGE(A4:E9;B5:D10) C . AVERAGE(A4:E9:B5:D10) D . AVERAGE(A4:E9  B5:D10)
小方同学在某网站注册时需要预设登录密码,预设密码需要符合以下2点:①密码不少于6位字符组成;②必须同时包含大写英文,字母、小写英文字母、阿拉伯数字和标点符号。据此,该同学编写了生成密码的VB程序,程序运行界面如图a所示,当点击“生成密码”按钮( command1)时,在文本框Text1中输出符合要求的密码字符

图b为标准ASCII码表供你参考(其中ASCII为1-32,127的字符为特殊符号,不能用作密码):

实现上述功能的VB程序代码如下,请回答以下问题:

  1. (1) 请在划线处填入合适的代码。

    Private Sub Command1_Click() 

        Dim t As Integer, flag as Boolean

        Dim pwd as String ,n as Integer

        Dim a(1 To 4) As Integer

        flag= True

        n=0

        pwd=" "

        Randomize

        Do While flag

            t=             '随机生成33~126的ASCII码

            pwd= pwd+Chr(t)

            s= 0

            For i=1 To 4

                s=s+a(i)

            Next i

            n=n+1

            If n>=6 And s=4 Then

        Loop

        Text1. Text= pwd

    End Sub

    '获取字符类型:1-小写字母,2-大写字母,3-阿拉伯数字,4-符号

    Function check(x As Integer) As Integer

        If x>=97 And x <= 122 Then

            check= 1

        ElseIf x >=65 And x <=90 Then

            check= 2

        ElseIf x>=48 And x <=57 Then

            check= 3

        Else

            check= 4

        End If

    End Function

  2. (2) 以下字符串不可能是上述程序生成的密码的一项是(填数字序号)

    ①H2? N64Aj

    ②[26wv9,Q

    ③$ 14G/uv④zX}rb! T&}d2

数组a中存放着1到20间的正整数,要求对其中的元素进行分段排序,在文本框Text2中输入每段元素的个数,在文本框Text3中显示每段降序排序后的数据,其中多余的元素不做处理。具体界面如下图所示:

实现该功能的VB程序如下,请在划线处填入合适的代码:

Dim a (0 To 100) As Integer

Const high=16

Private Sub Form_Load()

    '产生high个随机数,并显示在文本框Text1,代码略

End Sub

Private Sub Command1_Click()

    Dim p As Integer, q As Integer, t As Integer

    Dim m As Integer, n As Integer, k As Integer

    m=Val(Text2.Text)

    For i=1 To

        c=“”

        For j=1 To m-1

           

            q=i*m

            k=sort(p, q)

            If a(k)<>a(q) Then

                t=a(p): a(p)=a(k): a(k)=t

            End If

           

        Next j

        Text3.Text=Text3.Text+ “”+c

    Next i

End Sub

Function sort(f As Integer, g As Integer) As Integer

    s=f

    For i=f+1 To g

        If a(i)>a(s) Then

           

        End If

    Next i

    sort=s

End Function

简述信息技术的发展趋势。
如果一个数从左到右和从右到左看都是一样的,称这个数为回文数。例如:12321。若将任意1个三位正整数存储到变量num中,下列语句执行后变量new的值是回文数的是(      )
A . B . C . D .
下列关于数制的说法正确的是(    )
A . 4位二进制数能表示的最大十进制数为16 B . 某十六进制数的末位是“0”,则该数转换成十进制末位也是“0” C . 在某二进制数的末尾添加一个“1”,则形成的新数是原数的2倍 D . 某八位二进制数最高位是“1”,则它在内存中不可能表示一个ASCII编码的字符
有5个砝码,外观一模一样,其中有一个异常砝码重0.9g,其他砝码重1g。请问最多需要使用(     )次天平一定找出那个重0.9g的砝码。
A . 2 B . 3 C . 4 D . 5
下面优先级最高的运算符是(     )
A . ** B . ( ) C . + D . /
警察到达案发现场,一般按照下列哪种思路开展工作(   )

①观察、分析现场 ②收集必要的信息 ③进行判断、推理 ④按一定的方法和步骤解决

A . ②①③④ B . ①③②④ C . ③①②④ D . ①②③④
张阳同学想购买某种品牌的一台计算机,他通过访问该公司的网站,了解了各种型号计算机的配置信息。张阳了解计算机配置信息的过程属于(  )
A . 加工信息 B . 选择信息来源 C . 获取信息 D . 发布信息
小张在Flash中制作了一个名为“start”的按钮元件,部分界面如下图所示。将该按钮应用到“场景 1”场景,测试该场景时发现:当鼠标指向该按钮时,指针没有变成小手形状。可能的原因是(   )

A . “弹起”帧是关键帧 B . “指针经过”帧不是关键帧 C . “按下”帧不是关键帧 D . “点击”帧是空白关键帧
模拟信号数字化的三个步骤依次是(    )
A . 抽样   量化   编码 B . 量化   编码   抽样 C . 抽样  编码   量化 D . 编码  量化 抽样
采用如下对分查找算法对数组a中7个有序数据“15,38,51,66,77,81,99”进行查找,查找数据为“55”,

i=1∶j=7∶x=55

Do While i<=j

    m=(i+j)\2

    If a(m)=x Then Exit Do

    If a(m)>x Then j=m-1 Else i=m+1

Loop

经过上述代码查找后,下列表述正确的是(  )

A . i=m+1 B . i=m-1 C . j>m+1 D . j<m-1
下列关于信息的说法正确的是(  )
A . 信息是指数据、信号、消息 B . 电影技术、计算机技术、广播和电视技术都属于近代信息技术 C . 信息消失在历史长河中,是因为信息可以被销毁 D . 通过查阅书籍可以了解唐代的繁华景象,体现了信息是可以脱离它所反映的事物被存储、保存和传播
下列有关网页与浏览器的说法,不正确的是(    )
A . 网页内容可以用HTML(超文本标记语言)来进行描述 B . 网页的三种基本元素为文字、图形图像和超链接 C . 在IE 浏览器中,以“网页,仅HTML”类型保存网页,可以保存网页中的图像 D . 浏览器中的收藏夹保存的是网页的URL
下列对于 Photoshop 操作正确的是(       )

A . 交换运动会图层与枫叶图层,不会影响当前效果 B . 当前选定的图层可以添加滤镜 C . 以 PNG 格式保存该图片,能保持背景透明性 D . 运动员跳高不可以添加图层样式
某算法的部分流程图如图所示。执行这部分流程,若输入a的值为13,则输出c的值是(    )

A . 2 B . 3 C . 4 D . 5
在下列选项中,信息的可信度最高的是(   )
A . 某权威股评家Blog上的股市走势预测 B . 某省气象台网站上的天气预报 C . 某民间培训机构发布的模拟测试卷 D . 某彩票网站发布的下期彩票预测
关于微型计算机的知识,正确的有(      )。
A . 外存储器中的信息不能直接进入CPU进行处理 B . 系统总线是CPU与各部件之间传送各种信息的公共通道 C . 光盘驱动器属于主机,光盘属于外部设备 D . 家用台式电脑不属于微型计算机
模拟某新型病毒传播的过程,已知有n*n个格子(1<=n<=10),某天其中某些格子由于不知名原因感染了病毒,开始影响周围的格子。传染原理如图a所示:

某3行3列的格子初始状态如图a所示,1表示异常(由于不知名原因感染了病毒且具有传染性),0表示正常。除了边上一圈的格子,每个格子周围有8个格子,第一天某正常格子周围超过半数格子异常,则该格子第二天就会变异常,并且带有传染性。传染过程如图b所示,矩阵中1、2、3、4分别表示该格子第1天、第2天、第3天、第4天被感染,0表示未被感染。可以看出该矩阵格子第4天全部被感染。

编写VB程序,运行程序后,在Text1中输入矩阵规模(不超过10),单击“初始化”命令按钮,在List1中输出第一天所有格子的状态,单击“传播”命令按钮,在List2中输出所有格子的最终状态,并在Label2中输出第几天全部被感染或者“不会被全部感染”。

程序运行界面如图c所示。

  1. (1) 已知第一天所有格子状态如图d所示,则第天所有格子全部被感染。

  2. (2) 实现上述功能程序代码如下,完善划线处语句。

    Dim a(1 To 100) As Integer '存放格子状态

    Dim b(1 To 100) As Integer '辅助作用

    Dim zc(1 To 10000) As Integer '记录每一天的正常格子数

    Dim n As Integer '存放矩阵规模

    Private Sub Command1_Click()

        Dim i As Integer, j As Integer, s As String

        List1.Clear

        n = Val(Text1.Text)

        For i = 1 To n

            s = ""

            For j = 1 To n

                a((i - 1) * n + j) = Int(Rnd() * 2)

                s = s + Str(a((i - 1) * n + j))

                If a((i - 1) * n + j) = 0 Then

            Next j

            List1.AddItem s

        Next i

    End Sub

    Private Sub Command2_Click()

        Dim i As Integer, j As Integer, tian As Integer, flag As Boolean

        List2.Clear

        '下面代码实现病毒传染过程

        tian = 1: flag = False

        Do While zc(tian) > 0

            tian = tian + 1

            For i = 1 To n * n

                If a(i) = 0 Then

                    If Then b(i) = tian

                Else

                    b(i) = a(i)

                End If

            Next i

            For i = 1 To n * n

                If b(i) = 0 Then zc(tian) = zc(tian) + 1

                a(i) = b(i)

            Next i

            If Then flag = True: Exit Do

        Loop

        '在List2中输出所有格子的最终状态,代码略。

        If flag Then

            Label2.Caption = "不会被全部感染"

        Else

            Label2.Caption = "第" + Str(tian) + "天全部被感染"

        End If

    End Sub

    'Judge函数用来判断第i行第j列的格子周围的异常格子数是否超过半数,超过半数返回True

    Function Judge(i As Integer, j As Integer) As Boolean

        '代码略

    End Function