相关试卷

1、用坐标轴模拟一段时长为1ms的声波数字化的过程，每隔0.1ms取一个采样点，其中A点和B点分别为声波的最高点和最低点，如图所示，下列说法正确的是（）

A、该音频的采样频率为44.1kHz，量化位数至少是8位 B、该音频的采样频率为44.1kHz，量化位数至少是7位 C、该音频的采样频率为10kHz，量化位数至少是8位 D、该音频的采样频率为10kHz，量化位数至少是7位

查看解析
2、下列研究领域中，不属于人工智能范畴的是（）

A、机器学习 B、专家系统 C、编译原理 D、人工神经网络

查看解析
3、关于数据、信息与知识，下列说法错误的是（）

A、数据是信息的载体，单个数字没有意义 B、信息经过人为的解读和经验充实可以转化成知识 C、计算机只能处理数字化后的信息 D、不同的人接受同样的信息后，所构建的知识是相同的

查看解析
4、某办事处每天都有客户来办理业务，每位客户信息包括编号、到达时间(用字符串表示，例如“8：02”表示到达时间为8点2分)、办理业务所需要的时间(单位：分钟)。根据客户到达时间和办理业务所需要时间等信息，以及可同时办理业务的窗口数量m(m<10)，现统计办理完成所有业务时，客户平均等待时间、等待时间最长的客户编号及其等待时间。
根据上述要求编写VB程序，功能如下：读取某天上午办理业务的num个客户信息(已按到达时间顺序排列)，显示在列表框List1中。程序运行时，在文本框Text1中输入可同时办理业务的窗口数量m，单击“输出”按钮Command1，在列表框List2中输出客户平均等待时间、等待时间最长的客户编号及其等待时间。程序运行界面如第16题图所示。

请回答下列问题：

(1)、如图所示，可同时办理业务的窗口数量为3个，编号为“005”的客户完成业务办理的时间是。

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

Dim no(1 To n) As String, st(1 To n) As String, ti(1 To n) As Integer

Dim num As Integer        'num为待办理业务总人数

Private Sub Form_ load ()

'从数据库中读取所有客户编号、到达时间和办理业务所需要时间等信息，分别保存在

'数组no、st和ti中，统计总人数num，并在列表框List1中显示客户信息，代码略。

End Sub

Function t2d(x As String) As Integer

'将时间转化成从0点开始的时长(单位：分钟)来表示，例如8：18用498来表示；

'代码略

End Function

Private Sub Command1_ Click ()

Dim max_ no As String,max_ wait As Integer

Dim wait_ sum As Integer, wait_ time As Integer, wait_ num As Integer

Dim m As Integer, k As Integer, t As Integer

Dim w(1 To 10) As Integer     '数组w存储窗口办理业务结束的时间(从0点开始的时长)

Dim i As Integer, p As Integer, q As Integer

m = Val (Text1. Text)

wait_ sum = 0

wait_ num = 0

max_ wait = 0

max_ no =""

k=0

For i=1 To m

     w(i) = 0

Next i

For i=1 To num

   If Then '当前办理业务不需要等待

     t = t2d(st(i)) + ti(i)

    Else

      wait_ num = wait_ num + 1

      wait_ time = w(1) - t2d(st (i))

      wait_ sum = wait_ sum + wait_ time

      If wait_ time > max_ wait Then

       max_ wait = wait_ time

        max_ no = no(i)

      End If



    End If

    p =1

    Do While w(p)<t And p<=k

     p=p+1

    Loop

    If k<m Then    '当前办理业务不需要等待

      q=k

      Do While q > = p

        w(q+1)=w(q)

        q=q-1

      Loop

      w(p) = t

      k=k+1

    Else

      q=1

      Do While q< p -1



        q=q+1

      Loop

      w(q) = t

    End If

Next i

List2. AddItem "平均等待时间："+Str (Int (wait_ _sum/wait_ _num*10+0. 5)/10)+*分钟"

List2. AddItem "等待时间最长的是："+max_ no+"号, 等待了"+Str (max_ wait)+^ 分钟"

End Sub

查看解析
5、某超市管理人员需要对一周以来商品交易的部分流水账单进行分析，以找出销售额排在前3名(同金额同名次)的商品信息。
编写VB程序，实现上述功能。运行程序，在列表框List1中显示每笔交易流水记录的商品货号与销售金额，单击“分析”按钮Command1，汇总同类商品的销售额并在列表框List2中显示销售额前3名的商品货号与销售金额。程序运行界面如图所示。

(1)、在列表框中显示结果时，使用到的“AddItem” 是。
(单选，填字母： A .类名/B .属性名/C .方法名/D .事件名)

(2)、实现上述功能的部分VB程序如下，请在划线处填入合适的代码。
'n是交易流水的记录总数，ng是商品种类，代码略

Dim goods(1 To n) As String      '每笔交易的商品货号

Dim money(1 To n) As Single      '每笔交易的销售金额

Dim g(1 To ng) As String

Dim c(1 To ng) As Single

Private Sub Form_ Load ()

    '读取每笔交易流水，分别将商品货号存入数组goods、销售金额存入数组money

    'g(1)~g (ng)分别存储ng种商品的货号，在List1中显示交易记录信息，代码略

End Sub

Private Sub Command1_Click ()

    Dim i As Integer, j As Integer, tc As Single, tg As String

    For i=1 To n

        For j=1 To ng

             If goods(i) = g(j) Then

        Next j

    Next i

    i =1

    Do While i <= ng

        Fo rj=ng To i+1 Step-1

            If c(j)>c(j-1) Then

                tc=c(j) : c(j)=c(j-1) : c(j-1)=tc

                tg=g(j) : g(j)=g(j-1) : g(j-1)=tg

             End If

        Next j

        If Then Exit Do

        i =i+1

    Loop

    For j=1 To

        List2.AddItem g(j) +“”+ Str(c(j))

    Next i

End Sub

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

查看解析
6、小李制作主题为“冬奥会”的多媒体作品。首先使用Photoshop软件处理图像，然后使用Flash软件制作动画作品。请回答下列问题：

(1)、如图a所示，在当前状态下，执行下列操作，能得到背景(卡通形象之外的区域)透明的卡通图像文件的有 (多选，填字母)。

A、用橡皮擦工具擦除卡通形象之外的区域，再存储为“冰墩墩.gif”文件 B、用魔棒工具选取卡通形象之外的区域设置不透明度为0%，再存储为“冰墩墩.png”文件 C、用多边形套索工具选取并删除卡通形象之外的区域，再存储为“冰墩墩．gif"文件 D、用磁性套索工具选取卡通形象后执行“拷贝”“粘贴”操作，再隐藏“图层0”图层，最后存储为“冰墩墩.jpg”文件

(2)、制作动画作品的部分界面如图b所示，“标题”图层利用库中的“文字”元件产生的实例创建由大变小的同时从完全透明到完全显示的动画效果，该补间类型是。

(3)、“卡通”图层中的声音素材总时长为10秒。测试场景，发现声音播放到第15帧就停止不播放，若要实现声音播放完整，不改变其它动画的情况下，可以执行的操作是。

(4)、“会标”图层的第15帧和第25帧是相同的内容，实现会标在第15-25帧静止不动的效果。测试场景，会标在20-24帧消失不见。不改变其它动画的情况下，下列修改操作可行的是 (多选，填字母)

A、对第20-24帧执行删除帧操作 B、对第20帧执行清除关键帧操作 C、把第19帧移动到第20帧 D、把15帧中的实例拷贝到第24帧中 E、对第20-24帧执行清除帧操作

(5)、测试影片，若要实现“场景1”动画在第50帧停止播放，则选择“标题”图层第50帧添加动作脚本。

查看解析
7、小华收集了2011年~2020年全国废气主要污染物排放的部分数据，并使用Excel软件对数据进行处理，如图a所示。

请回答下列问题：

(1)、在C4单元格中输入公式，再向下自动填充至单元格C12，并将区域C4：C12复制粘贴到区域E4：E12和G4：G12，则单元格E4中的公式为。

(2)、由于操作失误，不小心清除了单元格B12中的内容，则C12单元格中显示的结果是(单选，填字母A . #DIV/O！ / B . #REF！ / C . -100.00% / D . 100.00%)

(3)、为了反映2011年~2020年全国废气主要污染物排放变化情况，根据图a中的数据制作的图表如图b所示。综合图a和图b，下列说法正确的有 (多选，填字母)。

A、创建该图表的数据区域为A1，A2：B12，D2：D12，F2：F12 B、2011年~2020年间主要污染物排放量减少最快的是二氧化硫 C、将图a中数据按年份进行降序排序，则图表不会发生变化 D、将区域F3：F12中的数值格式设置为1位小数，则图表不会发生变化 E、依次以“二氧化硫环比”、“氮氧化物环比”为筛选条件，都选择“最小3项”进行筛选后，筛选结果只显示2016年和2020年的数据

查看解析
8、某对分查找算法的VB程序段如下：
i =1：j=10: key = 88

Do While I <=j

    m=(i+j)\2

    If key < a(m) Then j = m-1 Else i=m+1

Loop

数组元素a(1)到a(10)的值依次为“12，15，18，20，25，39，47，88，90，99”，经过上述代码查找后，下列表达式正确的是(    )

A、j<m-1 B、j=m C、i>m+1 D、i= m

查看解析
9、有如下VB程序段：
s ="wantsfood"

t = Mid(s, Len(s), 1)

max=0

For i=Len(s)-1 To 1 Step-1

    If Mid(s, i + 1, 1) >= Mid(s,i, 1) Then

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

        If Len(t) >= max Then max = Len(t): ans= t

    Else

        t = Mid(s, i, 1)

    End If

Next i

执行该程序段后，变量ans和max的值分别是(    )

A、"ant", 3 B、"foo",3 C、"stna", 4 D、"doof", 4

查看解析
10、统计6位由“0”、“1”组成的数字串中“0”和“1”个数相同的数字串个数。实现上述功能的VB程序段如下。
k=0

For i=0 To 63

    n =0



    For j=1 To 6





    Next j

    If n=3 Then k=k+1

Next i

Text1.Text=“符合要求的数字串有”+ Str(k) + “个”

上述程序段中方框处可选语句为：①d=d\2   ②d=I   ③n =n+dMod2

则(1) (2) (3)处语句依次可为(    )

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

查看解析
11、两个班级(人数均为50) 的学生参加志愿者活动的次数存储在数组a中，其中第1段元素a(1)~a(50)存储着第1个班的数据，第2段元素a(51) ~a(100)存储着第2个班的数据。使用选择排序算法分别对每段中的数据进行降序排列，则数组元素之间的总比较次数是( )

A、98 B、2450 C、2550 D、4950

查看解析
12、某算法的部分流程图如图所示，执行这部分流程，若输入m的值为18，n的值为31582，则输出c的值是( )

A、35 B、25 C、352 D、253

查看解析
13、下列VB表达式中，值最大的是( )

A、Asc (Chr(65)) - 60 B、Int(-53/10)+10 C、41Mod22\3 D、Val("1"+ "2")

查看解析
14、一个时长为10秒、1024×512像素、24位真彩色、25帧/秒的未经压缩的AVI格式无声视频文件，压缩为MP4格式，其压缩比为10：1~50：1，则压缩后的MP4文件容量最小约为（）

A、307.2KB B、7.5MB C、37.5MB D、60MB

查看解析
15、使用GoldWave软件对某音频文件进行处理，部分界面如图所示。

下列说法正确的是（）

A、把该音频另存为MP3格式属于有损压缩 B、执行“静音”操作后，该音频播放时有4秒钟静音 C、执行“粘贴”4秒音频操作后，该音频总时长不变 D、执行“剪裁”操作后，该音频总时长缩短为原来的2/5

查看解析

16、用Access软件设计图书借阅管理系统的数据库，其中已建好的“借阅信息”数据表用于存储如图所示的表格数据。

姓名	班级	学号	书名.	作者	出版社	借阅时间	图书状态
肖战	101	20210101	呐喊	鲁迅	现代出版社	2022/3/10	在借
朱一龙	206	20200262	围城	钱钟书	铁道出版社	2021.9.30	已还
白敬亭	103	20210316	雷雨	曹禺	现代出版社	2022-1-10	逾期

下列关于“借阅信息"数据表的描述，不正确的是（）

A、该数据表用于存储图书借阅情况的流水信息 B、该数据表的字段数可以多于上述表格的列数 C、“借阅时间”列的数据类型可以设置为“日期/时间” D、“图书状态”列的数据类型可以设置为“是/否”

查看解析

17、使用UltraEdit软件查看字符内码，部分界面如图所示。

下列说法正确的是（）

A、字符“B”的二进制内码值是00101010 B、字符“M”比字符“j”的内码值大 C、“加油”两个字符的内码占32个bit D、字符“！”的十六进制内码值是A1

查看解析
18、下列关于网络信息资源获取与信息安全的说法，正确的是（）

A、利用搜索引擎检索信息时，关键词越多，搜索到的信息越多 B、因特网上检索信息最常用的两种途径是自动网页检索和主题目录检索 C、计算机病毒是人为编写、破坏他人计算机系统的计算机程序 D、开发者开发设计的计算机软件，申请专利之后才开始受法律保护

查看解析
19、下列有关信息与信息技术的说法，正确的是（）

A、人类的生活离不开信息，信息无处不在 B、声音、图像、磁带、光盘都是信息的载体，但人的大脑不是信息的载体 C、典型的现代信息技术包括摄影技术、电影技术、计算机技术和通信技术等 D、报刊书籍、广播电视、网络多媒体技术都是常用的信息表达方式

查看解析
20、已知数组a有n个元素，现编写VB程序，实现从第1个元素开始分割出m×m个元素组成方阵(约定n≥m×m)，并随机对该方阵进行顺时针90度或逆时针90度旋转。例如：数组元素a(1)到a(18)的值依次为“5，2，3，1，9，4，7，6，0，8，5，3，8，3，7，0，5，1”，在文本框Text1中输入方阵规模4，单击“生成”按钮Command1，生成4×4个元素组成的方阵，并在列表框List1中显示。单击“旋转”按钮Command2，该方阵进行顺时针90度或逆时针90度旋转，并在列表框List2中显示。程序运行界面如图所示。

(1)、对于如图所示的程序运行界面，将方阵规模改为3，单击“生成”按钮后再单击“旋转”按钮，若方阵进行逆时针旋转，则旋转后方阵的第1行数据为(数据之间用“，”隔开)。

(2)、请在划线处填入合适的代码。
Const n= 100

Dim a(1 To n) As Integer

Dim b(1 To n) As Integer

Private Sub Command1_Click( )

'根据方阵规模，分割元素组成方阵，并在列表框List1中显示，代码略

End Sub

Private Sub Command2_Click( )

Dim i As Integer, j As Integer, m As Integer, k As Integer

Dim s As String

m= Val(Text1. Text)

List2. Clear

k= Int(Rnd * 2)

If k=0 Then

    For i=1 To m

      For j=1 To m

         b((i- 1) * m+j)=

      Next j

    Next i

Else

    For i=1 To m

      For j=1 To m

         b((i-1) * m+j)=a((j-1) * m+m-i+1)

      Next j

    Next i

End If

s=" "

For i=1 To m * m



    If Then

      List2. AddItem s

      s=""

    End If

Next i

End Sub

查看解析

上一页 395 396 397 398 399 下一页跳转