相关试卷

  • 1、小明收集了最新中国大学排行榜的有关数据,并使用Excel软件进行数据处理,部分界面如图a所示。

    图a

    请回答下列问题:

    (1)、现要根据总分对各个大学进行排名,在单元格H3中输入公式,然后向下自动填充至单元格H135。发现最后结果中很多学校的排名重复,为了得到正确的排名,可将单元格H3中的公式修改为 , 向下自动填充后才能得到正确结果(注:公式RANK(A1,A1:A5)表示A1单元格的值在区域A1:A5中的排名)。
    (2)、对区域A2:H135进行相关数据分析,下列说法正确的是              (多选,填字母)。
    A、将E列中数据的小数位数统一设置为0,则该列的真实数据将发生改变 B、若要筛选出上海地区排名最高的学校,则可选择“排名”为关键字升序排序,再对“地区”进行筛选,选择的值为“上海”,排名最前的即为该学校 C、若要筛选出排名前50高校中,高被引科学家人数最多的5所高校,可先对修改后的“排名”进行筛选,条件为小于等于50,再对“高被引科学家人数”进行筛选,选择“10个最大的值”并显示最大的5项 D、若要筛选出北京地区总分达到90的高校,可先对“地区”进行筛选,选择的值为“北京”,再对“总分”进行筛选,条件为大于等于90
    (3)、对图a中的数据进行相关统计,结果放在新工作表中,如图b所示。根据图b中的数据制作的图表如图c所示,可知创建该图表的数据区域是

    图b

    图c

  • 2、有如下VB程序段:

    For i=1 To n-1 Step 2

        For j=1To((n+1)\2)*2-i-2 Step 2

            If a(j)>a(j+2)Then

                t=a(j):a(j)=a(j+2):a(j+2)=t

           End If

        Next j

        For j=  ① 

            If a(j)>a(j-2)Then

                t=a(j):a(j)=a(j-2):a(j-2)=t

            End If

        Next j

    Next i

    执行该程序段后,实现了对数组元素a(1)~a(n)中的奇数位置从小到大排序,偶数位置从大到小排序。则代码中①处的语句可为(    )

    A、(n\2)*2 To i+1 Step-2 B、(n\2)*2 To i+3 Step-2 C、i+1 To(n\2)*2  Step2 D、i+1 To (n\2)*2-2 Step2
  • 3、某对分查找算法的VB程序段如下:

    i=1:j=25

    n=0

    Do While i<=j

        m=(i+j+1)\2

        n=n+1

        If key=a(m)Then Exit Do

        If key>a(m)Then i=m+1Elsej=m-1

    Loop

    Labe11.Caption=Str(n)

    数组元素a(1)~a(25)的值依次为1~25,若查找键key为下列选项的值,程序段执行后,标签Label1中显示的内容与其他三项不同的是(    )

    A、7 B、12 C、19 D、22
  • 4、有如下VB程序段:

    s="olympicGames2021"

    ans=""

    i=1

    Do While i<=Len(s)

        t=Int(Rnd *2)+1

        x=Mid(s,i,1)

        y=Mid(s,i+t,1)

        If x>y Then an s=ans+x Else ans=ans+y

        i=i+t+1

    Loop

    Label1.Caption=ans

    执行该程序段后,标签Labe11上显示的内容不可能为(    )

    A、ymcms1 B、yicms2 C、oyims22 D、ypime1
  • 5、给定一个正整数,要求将该数各个位上数字反转得到一个新数,如数字56020反转得到新数2065。有如下VB程序段:

    n=Val(Text1.Text)

    s=""

    flag=True

    Do While n>0

          ⑴ 

        n=n\10

        If Not flag Or x>0 Then

              ⑵ 

            flag=False

        End If

    Loop

    If s="" Then s ="0"

    Labe 11.Caption=s

    方框中(1)和(2)应填入的代码顺序为(    )

    ①x=nMod10^len(n)  ②x=nMod10  ③s=Str(x)+s  ④s=s+Str(x)

    A、①③ B、②③ C、①④ D、②④
  • 6、某算法部分流程图如图所示。执行该流程后,若输入的值为47和3,则输出s的值为(    )

    A、20 B、26 C、15 D、17
  • 7、下列VB表达式的值与其他三项结果不同的是(    )
    A、Len("河南加油!")Mod4\2+2 B、Int(Val(Mid("烟花392",3,2))/10) C、12\2*3-15 D、9^0.5+Int(Rnd())
  • 8、将帧频为10fps、总帧数为120帧的Flash动画作品导出为不压缩的无声AVI视频文件,其参数为768*1024像素、32位真彩色,该视频文件的存储容量约为(    )
    A、2.81GB B、360MB C、36MB D、30MB
  • 9、使用Photoshop软件制作“烟花易冷”作品,部分编辑界面如图所示。下列说法正确的是(    )

    A、“烟花”图层可能添加了滤镜 B、不可以将“树”图层移动到“叶”图层上方 C、“背景”图层不可以调整不透明度,也不能隐藏 D、将“易冷”图层的图层样式复制到“烟花”图层后,“烟花”图层显示投影、外发光效果
  • 10、下列有关信息编码的说法,正确的是(    )
    A、字符“Hey~假期”存储在计算机中,至少需要8个字节 B、已知字符“29”的十六进制内码为“32 39”,则字符“30”的十六进制内码为“33 3A” C、十进制数26转换为二进制数是100110 D、某4位十六进制数n,其末位数字为0,若转换为十进制数m,无法确定m能否被16整除
  • 11、某Access数据表中的记录与字段的数据类型如下图所示。下列说法正确的是(    )

    A、当前数据表视图下,删除“进价”字段的操作可以撤销 B、若改变产品“冰箱”的售价,其对应的销售额的字段值也会发生改变 C、可以在产品“电视机”和“热水器”两条记录中间插入一条ID为4,产品名为“空调”的记录 D、当前状态下不可以对“日用品销售表”重命名
  • 12、下列关于网页与浏览器的说法,不正确的是(    )
    A、网页超链接的链接目标可以是网页、图像、视频 B、浏览器与Web服务器之间的信息传输一般采用HTTP协议 C、若POP3协议发生错误,则电子邮件无法发送到收件人的邮件服务器中 D、在IE浏览器中可以以“单个文件(*mht)”格式另存网页
  • 13、下列关于信息和信息技术的说法,正确的是(    )
    A、Word、PPT是信息的一种表达技术,其中的文字、图像就是信息 B、信息可以通过人与人的交流来传递和共享,但在传递和共享的过程中可能会产生损耗 C、在APP上注册账号时,使用大小写字母、数字、符号组合成的密码,提高了账号信息的安全性 D、苹果设备之间可以使用“隔空投送”发送文件,因此信息的传播可以不依附于载体
  • 14、某信息仅包含大写字母,字符数不超过n*n(n*n 为密钥矩阵规模,n<10),加密过程如下:

    根据上述加密算法编写解密程序。程序在启动时读取密钥矩阵存入数组a 中,在文本框Text1

    中输入密文,点击“解密”按钮,在文本框Text2 中显示明文。运行界面如图c 所示。

    (1)、在文本框text1 中输入的密文是“8,1,23,2,17,3,33,4,”,则原文是(密钥矩阵按图a 中的密钥矩阵)
    (2)、实现上述算法的VB 程序如下,请在划线处填入合适的代码。

    Const n = 3

    Dim a(1 To n * n) As Integer

    Private Sub Command1_Click()

        Dim mw(1 To 2*n*n) As Integer

        '存储密文数据,奇数位存储加密值,偶数位存储该数据在原文中的位置

        Dim yw(1 To n*n) As Integer         '存储解密数据

        Dim k As Integer

        '生成规模为n*n 的密钥矩阵存入数组a中,代码略

        For i = 1 To Len(Text1.Text)

            c = Mid(Text1.Text, i, 1)

            If c <> "," Then

                t = t * 10 + Val(c)

            Else

               

                mw(k) = Val(t): t = 0

            End If

        Next i

        For i = 1 To k\2      '对密文解密,结果存数组yw

            yw(mw(2 * i)) =

        Next i

        s = ""

        For i = 1 To k\2

            s = s + Chr((yw(i)) + 64)

        Next i

        Text2.Text = s

    End Sub

    Function getmm(x As Integer, n As Integer)

        col = (x - 1) Mod n + 1

        row = (x - 1) \ n + 1

        getmm = a((col - 1) * n + row)

        If row Mod 2 = 0 Then getmm =

    End Function

  • 15、数据分组。将n个两位正整数按十位上的数字分组显示,十位上的数字是奇数的升序排序,十位上的数字是偶数的降序排序。某同学编写VB程序实现该功能,点击“生成”按钮随机生成n个两位正整数并显示在列表框List1中,点击“分组”按钮将整数按十位上的数字分组显示在List2中,程序运行界面如图所示。请回答下列问题:

    (1)、根据程序界面和代码,本程序用到的类共有 个
    (2)、在程序划线处填入合适代码,使程序完整

    Const n = 10

    Dim a(1 To n+1) As Integer

    '随机生成n个两位正整数,存入数组a中,代码略

    Private Sub Command2_Click()

        For i = 1 To n \ 2

            m =

            For j = i To m

                If a(j) > a(j + 1) Then t = a(j): a(j) = a(j + 1): a(j + 1) = t

            Next j

            k = m

            For j =

                If a(k) > a(j) Then k = j

            Next j

            If k <> i Then t = a(k):  : a(i) = t

        Next i

        s = ""

        For i = 1 To n

            If a(i) \ 10 Mod 2 = 1 Then s = s + Str(a(i)) Else s = Str(a(i)) + s

            If  Then List2.AddItem s: s = ""

        Next i

    End Sub

    (3)、加框处代码有错,请改正
  • 16、使用Flash制作多媒体作品“中秋.fla”,部分界面如下图所示,请回答以下问题:

    (1)、根据多媒体作品的设计流程,下列操作应在“制定脚本大纲”环节之后的是 (多选,填字母:A .确定该作品的适用人群/B .编写该作品的文字脚本/C .根据需求确定该作品的结构类型/D .将该作品所涉及的媒体元素逐一列出)
    (2)、该作品库中共有个元件,“月亮”图层实现了月亮的淡入淡出效果,该图层第1帧对象不可能的是(单选,填字母:A .图形元件/B .影片剪辑元件/C .位图)
    (3)、要使“中秋”动画只播放一遍,则可以在 图层最后一帧添加动作脚本
    (4)、“兔子”图层中兔子是“元件2”的实例,为了使该实例在测试场景时从21 帧到31 帧在舞台上消失,其它动画效果保持不变,下列操作方法可行的是         (多选,填字母)
    A、将该图层移动到“背景”图层下方 B、选中该图层第21帧执行“清除帧”操作 C、选中该图层第21帧到31帧执行“删除帧”操作 D、选中该图层第21帧执行“插入空白关键帧”操作 E、选中该图层第21帧执行“插入关键帧”操作,将该帧实例的Alpha值设为0%
  • 17、教师用Excel处理全校选考技术的学生成绩,如图a所示。回答以下问题:

    (1)、统计各班优秀人数,H3单元格计算“高三1班”学生成绩“>=85”的学生数的公式是=COUNTIFS(A3:A170,G3,C3:C170,H2),将之自动填充到H4:H7,I3:I7,完成各班“>=85”和“>=80”的人数正确计算,则H3 单元格的公式应修改为 。(备注:COUNTIFS 函数将条件应用于跨多个区域的单元格,然后统计满足所有条件的次数)
    (2)、若删除B列,能否正确统计各班优秀人数 (单选,填字母:A .能/B .不能/)
    (3)、根据图a中的数据制作的图表如图b所示,下列描述正确的是         (多选,填字母)

    A、创建该图表的数据区域是G2:G7,I2:I7 B、将单元格C170的数据修改为86,图表不会随之变化 C、选择A2:E170区域,按“班级”升序排序,图表会随之变化 D、选择A2:E170区域,以“班级”是“高三1班”进行筛选,图表会随之变化
  • 18、有如下VB 程序段:

    s = Text1.Text: k = 1: maxlen = 1

    For i = 2 To Len(s)

        If Mid(s, i - 1, 1) < Mid(s, i, 1) Then

            k = k + 1

        If k > maxlen Then maxlen = k

        Else

            k = 1

         End If

    Next i

    Label1.Caption = Str(maxlen)

    在文本框Text1 中输入字符串“B3b8defhADot”,执行该程序段后,则标签Label1 中显示的内容为(    )

    A、1 B、5 C、8 D、13
  • 19、有如下VB 程序段:

    Key = Val(Text1.Text):s = 0: i = 1: j = 7

    Do While i <= j

        m = (i + j) \ 2

        s = s + m

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

    Loop

    Text2.Text = Str(s)

    数组元素a(1)到a(7)的值依次为“12,15,18,20,20,20,29”,在文本框Text1中输入待查数,执行该程序段后,则文本框 Text2 中显示的内容不可能的是(    )

    A、7 B、9 C、15 D、17
  • 20、采用冒泡排序算法对数据序列“18,13,15,2,1,20”进行排序,第一轮排序后的结果为“1,18,13,15,2,20”,则完成整个序列的排序交换的次数是(    )
    A、6 B、7 C、8 D、9
上一页 617 618 619 620 621 下一页 跳转