相关试卷

1、有以下多媒体素材：
① Title.png ② Title.avi ③ Title.mpg ④ Title.gif ⑤ Title.swf ⑥ Title.flv

一般属于视频文件的有（）

A、①②⑤ B、②④⑤ C、②③⑤ D、②③⑥

查看解析
2、将一时长为10分钟、未经压缩、采样频率为44.1kHz、量化位数16位，双声道WAV音频文件另存为MP3格式，压缩比为10∶1，该MP3音频的存储容量约为（）

A、100MB B、10MB C、80MB D、50MB

查看解析
3、利用Photoshop软件把一幅大小为1280*1024像素、24位色的BMP格式图像存储为JPG格式，存储后容量约240KB，则图像的压缩比约为（）

A、128:1 B、32:1 C、16:1 D、2:1

查看解析
4、下列有关进制与字符编码的说法正确的是（）

A、十进制数98，转为七进制数表示为：170 B、任意进制的一个数n，若末尾为0，该数转为十进制一定是偶数 C、用n 位二进制数给m 种不同的信息编码，则必满足2 ^ n ≥ m D、汉字和英文字符在计算机内部编码均采用十六进制编码

查看解析
5、在杭甬铁路上行驶的“和谐号”动车均安装了智能GPS系统，不管动车行驶到哪里，在总调度室媒体的屏幕上总能立即反映出动车的具体位置，这主要体现了多媒体技术的（）

A、实时性 B、交互性 C、应用性 D、集成性

查看解析
6、五子棋游戏规则：⒈对局双方各执一色棋子(黑和白)；⒉每局黑方先下：⒊双方交替下子，每次只能下一子：⒋当一方棋子先连成五子即获胜(即横、竖或斜任意一个方向均可)。编写一个VB程序，单击“读取”按钮Command1读取五子棋某个状态的棋盘数据，单击“判断”按钮Command2，显示判断结果。运行界面如图所示：

●若双方已经分出胜负，则显示胜方及连成五子的第一颗棋子的位置(行号及列号)。

●若双方未分出胜负，则显示当前状态下将下棋的一方。

(1)、若棋盘上的黑白棋子数量不相等时，则将下子的一方是

(2)、编写如下VB程序，请在划线处填入合适的代码。
Constn= 10

Dim s(1 To 400) As String

Private Sub Command1_ Click)

‘读取棋盘数据存储在数组s中，●表示黑子，o表示白子，o表示空位，代码略

End Sub

Private Sub Command2_ Click()

  Dim i As Integer, j As Integer, fag As Boolean

    flag= False：i= 1

  Do While i <= n And flag = False

      For j= 1 Ton

            If Then flag = True： Exit For

        Next j

      i=i+ 1

  Loop

   i=i- 1

  If flag Then

        If (i-1)*n+j) = "o" Then

            Label1.Caption = "白方胜" + Str(i) + Str(j)

        Else

            Label1.Caption = "黑方胜" + St(i) + Str(j)

        End If

  Else

        If counts() Then Label1.Caption="黑方下" Else Label1.Caption ="白方下"

  End If

End Sub

Function judge(x As Integer, y As Integer) As Boolean

    Dim dx(1 To 4) As Integer, dy(1 To 4) As Integer

    Dim flag As Boolean,j As Integer, i As Integer, ux As Integer, uy As Integer

  dx(1)= 1： dx(2)= 1： dx(3)= 1：dx(4)= 0

  dy(1)= 1： dy(2)= 0： dy(3)=-1： dy(4)= I

  flag = False：i= 1

  If s((x-1)*n+y) <> "o" Then

      Do While i<= 4 And flag = False

            flag = True

            For j= 1 To 4

                ux= dx(i)*j+x

                uy=dy(i)*j+y

                If Not (ux>= 1 And ux <= nAnd uy>= I And uy <= n) Then flag = False: Exit For

                If Then flag = False： Exit For

          Next j

            i=i+ 1

        Loop

  End If

   judge = flag

End Function

Function counts() As Boolean

  Dim iAs Integer, j As Integer, white As Integer, black As Integer

  counts = False：white = 0： black= 0

  For i=1 To n

        For j= 1 Ton

           If(i-1)* n+j)= "o" Then white = white+ 1

           If((i-1)*n+j)= "●" Then black = black + 1

     Next j

    Next i

    If Then counts = True

End Function

查看解析
7、小明设计了某社团积分系统，当输入用户ID和积分增值后可以更新积分和排名。具体功能如下：单击“读取"按钮Command1后，将n个用户的ID (依次为1到n)、积分和积分排名显示在列表框List1中。在Text1中输入ID和积分增值，用逗号作为分隔符和结束符，奇数位置整数表示ID，偶数位置整数表示积分增值。如输入“2，1，3，5，”表示ID为2的用户增加1积分，ID为3的用户增加5积分。单击“更新"按钮Command2，在列表框List2中显示更新后的积分和排名。程序运行界面如图所示。

请回答下列问题：

(1)、若要清空列表框List1，下列代码正确的是(单选，填字母：A .List1.Clear /B .List1.Caption / C .List1.Text")。

(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。
Const n= 12

Dim a(1 To n) As Integer, mc(1 To n) As Integer

Private Sub Command1_Click()

'n个用户的ID依次为1到n，读取n个用户的积分和排名数据分别存储到数组a和数组mc中，并在列表框Listl中显示ID、积分、积分排名，代码略

End Sub

Private Sub Command2_Click()

    Dim i As Integer, j As Integer, k As Integer, d As Integer

  Dim s As String, flag As Boolean, x As Integer, y As Integer

  Dim p(1To20) As Integer    '存储输入的ID和积分增值，每次输入不超过10组

  For i=1 To 20

        p(i)=0

   Next i

  s= Text1.Text



   d=0：k=0

   For i= 1 To Len(s)

        If Mid(s, i, 1)= "，" Then

            If flag Then

                x = Val(Mid(s, i-d, d))

                For j= 1 To k Step 2

                    If p(j) =x Then Exit For

                Next j

                If j> k Then

                    p(j)=x：k=k+2

                End If

            Else

                y = Val(Mid(s, i-d, d))

                p(i+1)=p(j+ 1)+y

            End If

            flag= Not flag： d= 0

      Else



      End If

    Next i

    For i=1 To k\2

        x=p(2*i-1)：y=p(2*i)

        me(x)= 1

        For j= 1 Ton

            If j<> x Then

                If a(j)<a(x)+y And a(j)>=a(x) Then

            End If

            If a(j)> a(x) +y Then mc(x)= m(x)+ 1

        Next j



  Next i

    '在列表框List2中显示ID，积分、排名，代码略

End Sub

(3)、程序中加框处代码有错，请改正

查看解析
8、使用Flash软件制作一个展示“中国领先世界的科技”的多媒体作品。请回答下列问题：

(1)、使用GoldWave软件编辑背景音乐，部分界面如图a所示：

以下说法正确的是 ( 多选，填字母)

A、可以使用GoldWave的淡入功能实现音乐音量逐渐变大 B、把音乐另存为WAV格式的文件，音质会比原来的好 C、当前状态下执行“删除”命令，则该音乐变成单声道格式 D、在媒体元素分解表中需要记录该背景音乐文件的名称和处理工具 E、该音乐每秒播放的数据量为128kb

(2)、制作动画的部分界面如图b所示。每项科技的动画播完后暂停，单击“下一项”按钮后播放下一项科技的动画，则下一项"按钮上添加的动作脚本是。

(3)、为了使每项科技的补间动画持续时间变为1秒，在不改变各项科技补间动画开始时间和帧数的情况下，应进行的操作是。

(4)、根据图b所示的信息，以下说法正确的是 ( 多选，填字母)

A、测试场景时，一直能听到背景音乐，则声音同步方式可能为“事件” B、为实现“激光技术”图层第11帧到20帧的淡入动画效果，可把该图层第11帧中的图形实例Alpha值设为100% C、“高铁”图层展示的是高铁位图实例向右移动的动画，则其动画类型是动画补间 D、“量子技术”图层第10帧上有动作脚本"stop()；"，把该作品导出为AVI格式的影片，该影片播放到第10帧会自动停止

查看解析
9、如图a所示是2019年我国公立高校专任教师学历数据，现使用Excel软件对数据进行处理，请回答下列问题：

(1)、区域G3：J33显示每个地区的各学历比例，该区域数据由G3单元格填充得到，则G3单元格中的公式是。(提示：学历比例=该学历人数/该地区合计人数)

(2)、正确完成第1题后，隐藏B列，单元格G3中显示的内容为(单选，填字母：A .66%/ B .#DIV/0！/ C .#VALUE！)

(3)、根据图a数据制作的图表如图b所示。

以下说法正确的是 (多选：填字母)

A、该图表的数据源是A2：A6，C2：C6，也可以是A3：A6，C3：C6 B、如果按图c所示条件对数据进行筛选，图b所示图表中的柱形数量不变 C、对区域A2：J6数据按“合计"升序排序后，图b所示图表中的左起第一个柱形上的数字变为12345 D、区域G3：J33的数据显示效果可以通过设置“百分比”数字格式实现

查看解析
10、有如下VB程序段：
key= 2* Int(Rnd * 25)+ 1

For i= 1 To 9

  low=i+ 1： high= 10： flag = False

  Do While low <= high And Not flag

        m= (low + high) \2

        If key-a(i)<a(m) Then

            high= m- 1

        ElseIf key - a(i) > a(m) Then

            low=m + 1

        Else

            flag = True

       End If

    Loop

    If flag Then Exit For           'Exit For表示退出循环

Next i

数组元素a(1)到a(10)的值依次为“7，9，12，12，19，28，32，34，34，40”，执行该程序段后，变量i和m的值可能的是（    ）

A、1，4 B、2，8 C、3，6 D、5，7

查看解析
11、以下VB程序利用选择排序思想对数组a进行升序排序。
For i=1 To n\2

  iMax= i：iMin= i

  For j=i+ 1 To n-i+1

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

        If a(j) < a(iMin) Then iMin=j

   Next j



   If iMax= i Then



   Else



   End If

Next i

上述程序段中方框处可选语句为：

①temp=a(i)：a(i)=a(iMin)：a(iMin)=temp

②temp=a(iMin)：a(iMin)=a(n-i+1)：a(n-i+1)=temp

③temp=a(iMax)：a(iMax)=a(n-i+1)：a(n-i+1)=temp

则方框处的语句依次为（   ）

A、①②③ B、①③② C、②①③ D、③②①

查看解析
12、有如下VB程序段：
n = Val(Text1.Text)

i=2：c=0：t=0

Do While n>1

    If n Mod i=0 Then

        n=n\i

        If t <> i Then c=c+ 1

        t=i

        s=s+i

   Else

        i=i+1

   End If

Loop

在文本框Text1中输入120，执行该程序段后，变量s和c的值分别为（   ）

A、10，3 B、12，3 C、14，3 D、14，5

查看解析
13、有如下VB程序段：
s1="BUBBLESORT"：s2="”

i=1：j= Len(s1)

Do While i<j

  If Mid(s1, i, 1)< Mid(s1, j, 1) Then

      s2=s2+Mid(s1, j, 1)

  Else

      s2=s2+Mid(s1, i, 1)

   End If

   i=i+1: j=j-1

Loop

Label1.Caption=s2

执行该程序段后，标签Label1上显示的内容是（   ）

A、TUOSE B、TUOSL C、TROSE D、TROSL

查看解析
14、某算法的部分流程图如图所示。

执行这部分流程后，变量m的值为（）

A、4 B、6 C、8 D、9

查看解析
15、下列VB表达式的值最小的是（）

A、Val(Mid("7.82653"，3，1)) B、Len("-2+8") C、Asc("g")-Asc("b") D、55 Mod5* 15\9

查看解析
16、一段时长为20秒、1024×800像素、PAL制式(25帧/秒)的未经压缩AVI格式无声视频，容量为1560MB，则该视频的颜色模式是（）

A、16位色 B、24位色 C、32位色 D、256级灰度

查看解析
17、使用Photoshop软件制作“新疆棉花”作品，部分界面如下图所示。

下列说法正确的是（）

A、当前状态下，不可以使用自由变换单独调整“Support”图层中s的大小 B、复制“棉花”的图层样式粘贴到“纯白无瑕”图层，“纯白无瑕”图层会保留投影样式 C、无法将“我支持新疆棉花”图层移动到“纯白无瑕”图层上方 D、可以在“背景”图层添加“高斯模糊”滤镜，但不能设置不透明度

查看解析
18、一个两位十进制正整数n转换为二进制数m，下列说法正确的是（）

A、m的位数最多是8位 B、删除m的最右边两位后转换为十进制数x，则x=n\4 C、m乘以2的值可能是(100011)₂ D、如果n的个位数字是3，则m的最低位数字可能是0

查看解析
19、使用Access软件创建的数据表，其数据表视图部分界面如图所示。

下列说法正确的是（）

A、该数据表的名称为“学费表.accdb” B、该数据表有6个字段，在当前视图下可以添加字段 C、若添加一条记录，则新记录的“编号”字段值一定是6 D、在当前视图下，可以将“学费”字段的类型改为“货币”

查看解析
20、下列关于浏览器和网页的说法，正确的是（）

A、可以在网页的文字或图片上设置超链接 B、HTML协议的功能是传输网页 C、网页可以含有图片、动画等，故不能用记事本编辑网页 D、可以使用“添加到收藏夹”功能保存网页中的内容

查看解析

上一页 841 842 843 844 845 下一页跳转