相关试卷

  • 1、小章想将a数组中n个元素排列成合唱队列形态,具体方法如下:

    ①如果n是奇数,选出所有数据中最大元素,将其放在a数组正中间位置。

    ②从剩下待处理数据中选出最大的两个元素,同时将较大元素放在已处理数据段的右侧,较小元素放在已处理数据段的左侧。

    ③反复执行操作②,直到所有数据处理完毕。按上述要求,小章编写一个VB程序,功能如下:

    在文本框Text1中输入n,单击“生成”按钮Command1,并在文本框List1中显示排序前数据;单击“排序”按钮Command2,在列表框List2中输出处理后的结果。程序运行界面如下图所示。

    (1)、下列哪个选项,可以将窗体Form1标题改为:“生成合唱队列” (单选,填字 母:A . Form.Caption=“生成合唱队列”/ B . Label1.Caption =“生成合唱队列”/ C . Form1.Caption=“生成合唱队列”)
    (2)、实现上述功能的VB程序如下,请在划线处填入合适代码。

    Dim a(1 To 100) As Integer

    Dim n As Integer

    Private Sub Command1_Click()

    '在文本框Text1中输入n(n<=100)

    '排序前数据存储在数组a中,并在文本框List1中显示

    '代码略

    End Sub

    Private Sub Command2_Click()

      Dim i As Integer, j  As Integer, t As Integer

      Dim pMax1 As Integer, pMax2 As Integer

      pMax1 = n \ 2 + 1: pMax2 = n \ 2

        If

        Then

          For i = 1 To n

    If a(i) > a(pMax1) Then t = a(pMax1): a(pMax1) = a(i): a(i) = t

          Next i

          pMax1 = pMax1 + 1

        End If

      For i = 1 To n \ 2

      If  Then t = a(pMax1): a(pMax1) = a(pMax2): a(pMax2) = t

      j = pMax1 Mod n + 1

      Do While j <> pMax2

      If a(j) > a(pMax1) Then

        t = a(pMax1): a(pMax1) = a(j): a(j) = t

        t = a(pMax2): a(pMax2)= a(j): a(j) = t

     

        t = a(pMax2): a(pMax2) = a(j): a(j) = t

      End If

      Loop

        pMax1 = pMax1 + 1

        pMax2 = pMax2 – 1

        Next i

      For i = 1 To n

        List2.AddItem Str(a(i))

      Next i

    End Sub

    (3)、程序加框处代码有错,请改正。
  • 2、小齐制作主题为“端午节”的多媒体作品。她首先使用Photoshop制作了一张背景图片,然后用Flash制作动画。请回答下列问题:
    (1)、使用Photoshop软件编辑“端午.psd”,如图a所示,在当前状态下,下列操作可行的是 (多选,填字母: A . 更改“背景”图层的不透明度/B . 可以用“自由变化”命令 改变“五月五日”图层的文字大小/C . 直接给“小粽子”图层添加滤镜效果/D . 将“龙舟”图层移至“背景”图层下方)。

    图a

    (2)、在制作作品前,小齐规划该作品是面向小学生演示播放,这属于(单选,填字 母:A .应用需求分析/B .创作需求分析/C .系统结构设计/D .媒体元素分解)。
    (3)、使用Flash软件编辑“端午节.fla”,“端午”场景的部分制作界面如图b所示。

    图b

    将图中“端午佳节”图层第1帧到第19帧实现了“端午佳节”实例从舞台外进入舞台的动画,则该动画类型是。(单选, 填字母:A .形状补间动画/B . 动画补间动画

    (4)、“背景”图层的内容到最后一帧才出现,若要使“背景”图层的图片一开始就出现在舞台上,在不影响其他动画效果的前提下,则对“背景”图层进行的操作是
    (5)、测试影片时,单击“粽享美味”按钮,实现在浏览器中打开域名为“wufangzhai.tmall.com” 网页的内容,则“粽享美味”按钮的动作脚本为:
  • 3、小明收集了2020年6月3日的全球新冠肺炎疫情最新动态的数据,并将其中累计确诊人数超过5万的国家汇总成了一张表格,用Excel软件进行数据处理,如图a所示。

    图 a

    请回答下列问题:

    (1)、如图a所示,“排名”列的数据有Rank函数对“死亡率”列数据进行降序排名。小明通过H3单元格的公式对区域H4:H23进行自动填充,则H23单元格中显示结果是 (单选,填字母: A . # VALUE! / B . 17/ C . #DIV/0! / D . 1)。
    (2)、若要正确计算“排名”列的数据,可对H3单元格中的公式进行修改,对H4:H23进行自动填充,则H3单元格中的是
    (3)、小明在完成计算后,若要对欧洲地区的国家以“累计确诊人数”为关键字进行降序排序,则排序时选择的数据区域是
    (4)、根据图a中的数据制作的图表如图b所示,创建该图表的数据区域是

    图 b

  • 4、某对分查找算法的 VB 程序段如下:

    n  = 0: i = 1: j = 6

    Key = Val(Text1.Text)

    Do While i <= j

      m = (i + j) \ 2

      n = n + 1

      If Key = d(m) Then Exit Do

      If Key < d(m) Then j = m - 1 Else i = m + 1

    Loop

    If i <= j Then  s = m - n Else  s = n

    数组d(1)到d(6)的值依次为“4,6,9,13,20,25”,输入某个Key值后,运行该程序段后,变量s结果为3,则输入key的值不可能是(   )。

    A、25 B、20 C、5 D、3
  • 5、有如下 VB 程序段:

    s1 = "Shui"

    For i = 1 To Len(s1)

      ch = Mid(s1, i, 1)

      If ch >= "a" And ch <= "z" Then

        ch = Chr((Asc(ch) - Asc("a") + 23) Mod 26 + Asc("A"))

      End If

      s2 = ch + s2

    Next i

    Label1.Caption = s2

    执行该程序段后,标签Label1中显示的内容是(   )。

    A、FRES B、Serf C、freS D、SERF
  • 6、有如下 VB 程序段:

    Function t(x As Integer) As Long

      If x = 1  Then t = 1

        ElseIf x = 2  Then

          t = 2

        Else

        t = t(x - 1) + t(x - 2)

      End If

    End Function

    Text1.Text = Str(t(8))

    执行该程序段后,文本框 Text1 中显示的内容是(   )。

    A、21 B、34 C、55 D、89
  • 7、有如下程序段:

    For i = 1  To 2

      For j = i + 1  To 6

        If a(i) > a(j) Then

          t = a(j): a(j) = a(i): a(i) = t

        End If

      Next j

    Next i

    数组元素 a(1)到 a(6)的值依次为“3,4,2,1,5,0”,经过该程序段“加工”后,数组元素 a(1)到 a(6)的值依次为(   )。

    A、0,1,4,3,5,2 B、0,1,2,3,4,5 C、0,1,2,4,5,3 D、5,4,2,1,3,0
  • 8、某算法部分流程图如图所示。执行这部分流程,依次输入2、-5、12、-4、11、-3,则输出ans的值为(   )。

    A、16 B、19 C、23 D、25
  • 9、判断整数n能否被m整除,下列哪个选项表达式功能错误的是(   )。
    A、n \ m = 1 B、n Mod m = 0 C、n / m = Int(n / m) D、n \ m = n / m
  • 10、将一个未经压缩的1366*768像素、16色的BMP图像文件,转换成JPG格式图像文件。若该JPG格式图像存储容量为51KB,则压缩比约为(   )。
    A、20:1 B、40:1 C、10:1 D、8:1
  • 11、用GoldWave软件编辑音频,部分界面如图所示。下列说法正确的(   )。

    A、先执行“删除”命令,再执行“插入15秒静音”操作,保存后音频文件存储容量与原来一样 B、当前状态下直接保存文件,音频文件存储容量约为1.3MB C、执行“剪裁”命令后直接保存,音频文件存储容量大小为原来的1/4 D、执行“选定部分另存为”命令,按默认格式保存,生成的文件为单声道格式
  • 12、使用 UltraEdit软件查看字符内码,部分界面如图所示。下列说法正确的是(   )。

    A、共有 5 个 ASCII 码字符 B、若用不同输入法输入汉字“高”,将产生不同的汉字内码 C、字符“高”的内码二进制表示为“10111000 11011111” D、字符“!”的十六进制码是“20 21”
  • 13、使用Access打开数据库,部分界面如下图所示,下列说法正确的是(   )。

    A、无法在“出生日期”字段输入“2002.5.11”字段值 B、“ID”字段类型可能是文本型 C、可以将“性别”字段类型改为“文本”类型,修改后字段值显示为“Yes”或“No” D、删除当前记录后,该删除操作可以撤销
  • 14、小齐起床后先后做了下列事情,其中体现人工智能技术应用的是(   )。
    A、打开智能手环,查看晚上的睡眠质量 B、通过刷脸在路边自动售货机买了一瓶牛奶 C、经过自动测温仪检测温度后进入校园 D、在实践课上,用3D打印机打印出卡通人物“大头儿子”
  • 15、下列关于信息的说法,不正确的是(   )。
    A、信息必须依附于载体,但可以脱离它所反映的事物被存储、保存和传播 B、信息可以从一种形态转换为另一种形态 C、信息在传递和共享过程中可以重复使用,不会产生损耗 D、信息具有时效性,过期的信息没有任何价值
  • 16、若一个三位数abc满足 ,则称abc为水仙花数。如三位数153满足 ,则153是水仙花数。以下是找出所有水仙花数的程序,请把程序补充完整。(a为百位数、b为十位数、c为个位数)

    Dim i As Integer, a As Integer, b As Integer, c As Integer

    For i=100 To

      a=i\100

      b=

      c=i-100*a-10*b

      If Then

        Print  i

      End If

    Next i

  • 17、在Word中,文章的排版效果如下图所示。从图中可以看出,文章在排版时,主要进行了以下操作:

    (1)、设置标题的字体、字号,并采用对齐方式。
    (2)、对正文段落设置了 , 并使用分栏命令将文字分成左右两栏。
    (3)、对于插入的图片设置版式,其文字环绕方式为型。
  • 18、如下图所示,请将完成以下任务的操作步骤补充完整。

    任务:把“我的文档”中名为“临时文件夹”的文件夹改名为“temp”。

    操作步骤:

    (1)、用鼠标键单击“临时文件夹”文件夹。
    (2)、在弹出的快捷菜单中,选择“”命令。
    (3)、在名称框中输入“temp”,然后按键确认。
  • 19、根据下图,请从所列举的操作步骤中选出三个,把“广西新闻网”(http://www.gxnews.com.cn)添加到IE浏览器的收藏夹中。

    操作步骤:

    A.在地址栏中输入 http://www.gxnews.com.cn,按回车键

    B.单击“文件”菜单,选择“另存为”命令

    C.单击“收藏夹”菜单,选择“添加到收藏夹”命令

    D.在“保存”对话框中,输入“广西新闻网”,单击“保存”按钮

    E.在“名称”框中,输入“广西新闻网”,单击“添加”按钮

    正确的操作步骤是(只填字母序号):

  • 20、下列VB逻辑或关系表达式中,输出结果为“真”的是(   )。
    A、Int(-7.8) =-7  B、(12<5) or (8>6) C、Not(10<>9) D、(5>3) and (3>1)
上一页 1264 1265 1266 1267 1268 下一页 跳转