相关试卷

1、下列关于二进制的说法，不正确的是（）

A、二进制的标识为B B、二进制有两个基本数码：0、1 C、二进制采用逢二进一的进位规则 D、二进制运算式11+1=110

查看解析
2、下列有关数据采集和数字化的描述，正确的是（）

A、数据采集必须使用的设备是传感器 B、数据采集后一定要用计算机才能处理 C、数字化工具可将模拟信号可以转换为数字信号，反之则不行 D、在信息技术中，数字信号表示的数据指能被计算机存储和处理的二进制数据

查看解析
3、互联网、移动网络、物联网等每天都产生大量数据，大数据技术应运而生。以当前广泛应用的监控视频为例，某次交通事故视频画面，有效的部分可能仅仅只需要几秒，“提纯”大数据，是人们一直努力的目标。这体现了大数据以下哪个特征？（）

A、数据规模大 B、处理速度快 C、数据类型多 D、价值密度低

查看解析
4、“新冠疫情”期间，使用如右图“行程卡”可查询本人前14天内到达或途经的地市信息，可对到访地作提醒作用。下列说法不正确的是（）

A、行程路线是客观事实，“行程卡”一旦生成将不会改变 B、“行程卡” 是对行程路线的相关数据的一种表示形式 C、行程路线的相关数据也可以用其他形式来表示 D、人们在利用数据的同时，自身的行为也在产生数据

查看解析
5、由古至今，数据的记录形式多样化，下列说法不正确的是（）

A、远古“结绳记事” 中的大结小结的数量是数据 B、古人刻在泥板或者石器的图案是数据 C、发掘于汉墓中的竹简、帛书是数据 D、现在火车票上的身份证号码是数据

查看解析
6、某影厅共12排，每排10座。座位编号以排号+座号来命名，如第10排3座，编号命名为103。该影厅的最佳观影区为方框内的座位，即第5排3座~第10排8座的矩形位置。0表示该座位可选，非0表示已售(1表示系统推荐，2表示手工选择) 座位推荐算法：
1)只推荐最佳观影区的座位，从前往后，优先选择最中间的位置，若找到最中间位置，则推荐，否则继续寻找下一排，以此类推；

2)购票数为1时，推荐单个靠中间的位置，大于1时，只推荐连续的座位；

3)若在最佳观影区内未找到可以推荐的座位时，系统将提示手工选择。编写VB程序，模拟电影院选座。在文本框Text1中输入购票数，单击“选座”按钮Command1，在标签Labe12中显示机选座位。程序运行界面如图所示。

(1)、该影厅空座情况不变如上图所示，若购票数由2改为1，则推荐的座位编号为。

(2)、实现上述功能的VB程序如下，请在划线处填写合适的代码。
ConstC=10：ConstR=12    '每排10座，共12排

Dim zw(1 To C * R) As Integer， kzw(1 To C * R) As Integer      '座位，空座位

Private Sub Form_ Load ()

    '读取影厅座位数据存入数组zw，并将座位信息显示在列表框list1中，代码略

End Sub

Private Sub Command1_Click ()

    Dim i As Integer， j As Integer， k As Integer

    Dim x As Integer， min As Integer， start As Integer

    Dim m As Integer， n As Integer， ans As String

    m = Val (Text1.Text)          '购票数，确保数值在座位数以内

    n=0            '空座位的个数

    For i=5 To 10         '统计最佳观影区中的空座位编号

        For j=3 To 8

            If zw((i-1)*C+j)= 0 Then

                n=n+1

               kzw(n) =

            End If

       Next j

    Next i

    min = C： start=0： k=1

    Do While k+m-1<= n

        If kzw(k) + m-1= kzw(k +m- 1) Then

            x=Abs(C\2-(kzw(k)+kzw(k+m-1))\2 Mod C)

            If x < min Then

                min=x

                start = k     '记录满足座位条件的起始空位号

                If min=0 Then Exit Do    'Exit Do表示退出循环

            End If

        End If



    Loop

    ans =””

    If start = 0 Then

        ans = "未能推荐座位，请手工选座"

    Else

        For i = kzw(start) To

        'CStr函数把表达式转换为字符串，不产生前置空格

       ans = ans + "第"+ CStr(i \C+ 1) +"排"+ CStr(i ModC) +"座"

      Next i

    End If

    Label2.Caption = ans

End Sub

查看解析
7、某校将举行“希望杯”欢乐四项赛，比赛项目有跳绳、颠球、套圈、飞镖四项。团体赛规则：每班由2名选手参加；每名选手参赛项目不限；每项每班由1名选手参赛；团体成绩为4项得分的总和。根据团体赛规则，为推选出最优组合参赛，班级制定了如下推荐办法：个人总分前5名入围，在入围的选手中依据最高单项得分之和推选两位选手组队参赛(若有多组符合要求，则选择编号靠前的选手组队)。
编写VB程序，实现选手推荐功能：单击“入围”按钮Command1后，将入围选手名单及成绩按总分降序显示在列表框List1中，然后单击“推荐”按钮Command2，在标签Label1中显示推荐结果，程序运行界面如图所示。

(1)、要使窗体Form1标题显示“比赛选手推荐”，则需修改该窗体的属性。(单选，填字母：A . Font /B . Caption /C．BackColor)

(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。
Constrs=30     '初赛人数

Dim ts(rs) As Integer， dq(rs) As Integer， tq (rs) As Integer， fb(rs) As Integer

Dim xm(rs) As String， zf(rs) As Integer， bh(rs) As Integer

Dim n As Integer

Private Sub Command1_Click ()

    Dim i As Integer， j As Integer， k As Integer， t As Integer

    '读取选手姓名及四项比赛成绩，依次存入数组xm、ts、dq、tq、 fb，代码略

    For i=1 To rs

         zf(i) = ts(i) + dq(i) + tq(i) + fb(i)

        bh(i) = i

    Next i

    For i=1 To rs-1

        k=i

        For j = i+1To rs

              If Then k=j

        Next j

        If k<>i Then t=bh(i)：bh(i)=bh(k)：bh(k)=t

        If i > 5 And zf(bh(i)) < zf(bh(i - 1)) Then

             n=

             Exit For    'Exit For表示退出循环

        End If

    Next i

    '按要求将入围选手显示在列表框List1中，代码略

End Sub

Private Sub Command2_ Click()

    Dim smax As Integer， s As Integer， i As Integer， j As Integer

   Dim xs1 As String， xs2 As String

    smax = 0

    For i=1Ton- 1

        For j=i+ 1To n

            s = sum(bh(i)， bh(j))

            If s > smax Then



                xs1 = xm(bh(i))

                xs2 = xm(bh(j))

            End If

        Next j

    Next i

    Label1.Caption=xs1+""+xs2

End Sub

Function sum(x As Integer， y As Integer) As Integer

    sum=0

    If ts(x) > ts(y) Then sum=sum+ts(x) Else sum=sum+ts(y)

    If dq(x) > dq(y) Then sum = sum + dq(x) Else sum= sum + dq(y)

    If tq(x) > tq(y) Then sum = sum + tq(x) Else sum= sum + tq(y)

   If fb(x) > fb(y) Then sum = sum + fb(x) Else sum = sum + fb(y)

End Function

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

查看解析
8、使用Flash软件创作主题为“中国梦”的多媒体作品，部分编辑界面如图a所示。

(1)、创作多媒体作品需要进行需求分析。下列属于创作需求分析的是(多选，填字母：A .了解作品的社会效益、经济效益/B .确定作品的结构类型/C .确定获取原始素材的方式/D .考虑作品的脚本编写/E .确定作品的发布方式)。

(2)、“鸽子”图层第1帧的内容由库中“鸽子”元件生成。该元件的编辑界面如图b所示，该元件可由(单选，填字母：A .鸽子．gif /B .鸽子． jpg)文件导入库中直接生成，该元件中动画的类型是(单选，填字母：A .逐帧动画/B .补间动画)。

(3)、“按钮”图层的第45帧添加了动作脚本命令“stop()；”，声音的同步属性为事件。测试影片时，动画播放到第45帧自动停止，单击“播放”按钮，影片停止当前声音的播放，跳转到“中国梦”场景第1帧开始播放，则该按钮实例上添加的动作脚本是 (多选，填字母)

A、on(release) {stopAl1Sounds () ；gotoAndPlay("中国梦"，1)；} B、on (release) {stopAllSounds () ； gotoAndPlay(1)；} C、on (release) {stopAllSounds (45) ；gotoAndP1ay("中国梦"，1)；} D、on (release) {stopAllSounds (45) ； gotoAndP1ay(1) ；} E、on (release) {stopAllSounds () ；p1ay()；}

(4)、测试场景时，“天安门”图层内容在播放完第25帧后消失，为了使该图层第25帧内容延续到第45帧，应进行的操作是。

查看解析
9、收集某校高一年级3个班趣味运动会相关数据，并用Excel软件进行数据处理，部分界面如图a所示。

请回答下列问题：

(1)、区域H4：H123的数据是通过公式计算得到的，在H4单元格中输入公式。
再使用自动填充功能完成区域H5：H123的计算。(按照名次来计算得分，要求第1名得50分、第2名得49分……第50名得1分、其他名次得0分．提示：=IF(A4<8，8-A4， 0)表示A4单元格的值小于8时，返回8-A4的值，否则返回0)

(2)、对区域A2：I123进行相关数据分析，下列说法正确的是。(多选，填字母)

A、修改G4单元格的数据，I4单元格的值会随之改变 B、为了将总得分最高的男生数据显示在当前工作表第4行，可选择数据区域A4：I123，以“列B”为主要关键字按字母升序、“列I”为次要关键字按降序进行排序 C、选手编号规则为： S+两位班级编号+两位班内学号。先按“列I”降序排序，再对“选手编号”进行筛选，条件为包含“01”，则显示在最前面的是高一(1)班总得分最高的学生数据 D、选手编号规则为： S+两位班级编号+两位班内学号。为了显示高一(3) 班总得分最高的3位学生数据，可先对“选手编号”进行筛选，条件为开头是“S03”，再对“总得分”进行筛选，选择“10个最大的值”并显示最大的3项

(3)、对图a中的数据进行相关统计，结果放在新工作表中，如图b所示。根据图b中的数据制作的图表如图c所示。创建该图表的数据区域是。

查看解析
10、某对分查找算法的VB程序段如下：
For i=1 To 15

    a(i) = i

Next i

key = Int (Rnd * 20)

i = 1：j=15：n=0

Do While i<=j

    m=(i+j+1)\2

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

    n=n+1

Loop

执行该程序段后，变量n的值可能是(    )

A、1 B、2 C、3 D、4

查看解析
11、有如下VB程序段：
k=0：r=""

For i=1 To Len(s)

    If b(k) = Mid(s， i，1) Then

        k=k-1

    Else

        k=k+1

        b(k) = Mid(s， i， 1)

    End If

Next i

For i=1 To k

    r=r+b(i)

Next i

数组元素b(0)到b(10)的初始值为“”，若变量s的值为“abbaddcab”，执行该程序段后，变量r的值是(    )

A、”abdc” B、"aacab” C、"c" D、"cab"

查看解析
12、有如下VB程序段：
count = 0： n=7： i= 1

Do While i<=n

    If a(i)> a(i+1)Then

        count = count + 1

        t = a(i)： a(i) = a(i + 1)： a(i+1) =t

    End If

    If i=n Then i=0：n=n-1

    i=i+1

Loop

Text1.Text = Str (count)

数组元素a(1)到a(8)的值依次是“15，2，1，17，19，14，25，26”，执行该程序段后，文本框Text1中显示的是(    )

A、4 B、5 C、6 D、7

查看解析
13、将正整数n分解为连续正整数之和(如正整数9分解为2+3+4、4+5两种)。统计分解方法共有几种的VB程序段如下：
ans=0

n = Va1 (Text1． Text)

For i=1 To n\2

    t=n：x=i

    Do While t>0



    Loop

Next i

Text2.Text = Str (ans)

方框中的代码由以下三部分组成：

①If t=0 Then ans=ans+1   ②t=t-x③x=x+1

下列选项中，代码顺序正确的是(    )

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

查看解析
14、某算法的部分流程图如图所示，执行这部分流程，若输入n的值为10，则输出a、b的值分别是( )

A、4，6 B、9，12 C、16，20 D、25，30

查看解析
15、VB表达式16\2^2*3+ 2的值是( )

A、2 B、3 C、14 D、194

查看解析
16、一段未经压缩的时长60秒、立体声双声道44100HZ、16位WAV音频，要将其存储容量从约10MB减少到约2.5MB，在不改变其他参数的前提下，可调整采样频率、量化位数分别为( )

A、22050HZ、8位 B、44100HZ、8位 C、22050HZ、16位 D、44100HZ、24位

查看解析
17、使用Photoshop软件制作“青春追梦人”作品，部分编辑界面如图所示。

下列说法正确的是（）

A、可将“背景”图层的不透明度设置为“50%” B、可将“人物”图层的图层样式拷贝到“青春”图层 C、执行“自由变换”命令可以改变文字图层中的文字大小 D、将作品存储为BMP格式后会显示“内阴影”效果

查看解析
18、下列有关信息编码的说法，正确的是（）

A、全角英文字符的内码占1个字节 B、两位十六进制数的最大值等于256 C、已知字符“9”的ASCII码值为39H，则字符“10”的ASCII码值是3AH D、若一个二进制数的最低位为0，将其转换为十进制数后该数为偶数

查看解析
19、使用Access软件编辑某单位员工管理数据库，其中“献血情况"数据表的部分界面如图所示。

下列说法正确的是（）

A、在当前数据表视图中不能添加字段 B、可以将“姓名”字段设为“主键” C、“出生年月”字段的数据类型不可能为“文本”型 D、可以通过“导入文本文件”操作，对已有的数据表追加记录

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

A、描述网页基本元素的超文本标记语言简称是HTML B、收藏夹中的网址可以进行重命名、移动、删除操作 C、在IE浏览器中，保存网页操作不能获取图像文件 D、搜索引擎一般包括自动网页搜索和全文检索两大核心技术

查看解析

上一页 602 603 604 605 606 下一页跳转