相关试卷

1、（多选）不同领域的学者们从（）维度研究信息社会。

A、经济 B、社会 C、政治 D、文化 E、技术 F、网络

查看解析
2、（多选）虚拟空间中的大量数据库和服务器经由各种网络联结在一起，成为现实空间的映射。在这个映射过程，人们利用的是信息时代的核心产业，即（）

A、信息技术产业 B、信息经济产业 C、信息内容产业 D、信息流

查看解析
3、信息社会的特征描述不正确的是（）

A、数字生活 B、信息经济 C、在线办公 D、以上都是

查看解析
4、以下不属于信息社会的重要特征的是（）

A、以知识为基础的信息经济是最基本的经济形态，知识成为社会发展的巨大资源，以知识和人才为基础，以创新为主要驱动力 B、政府是最大的公共信息的采集者、处理者和拥有者 C、文化模式日趋虚拟化、单一化 D、工具数字化、方式数字化、内容数字化的社会生活，塑造出一种全新的生存与发展方式

查看解析
5、信息社会本质上是“以信息活动为基础”的社会，以下关于信息社会的说法不正确的是（）

A、人人可以创造、获取、使用和分享信息及知识 B、信息技术的发展程度在信息社会决定其发展力 C、信息社会是一个以人为本、具有包容性和全面发展的社会 D、在信息社会，个人、社会和各国人民匀能充分发挥各自的潜力

查看解析
6、在信息社会中，以知识为基础的信息经济是基本的经济形态。以下说法中，不属于信息经济特点的是（）

A、人力资源知识化 B、降低了获取信息与知识的成本 C、以创新核心技术应用为主 D、第三产业比重不断上升

查看解析
7、有一个木棒游戏，探究在一堆木棒中取4根木棒组成一个正三角形的取法数量（三角形其中一边由两根木棒组成，长度相同的不同木棒算不同的方案）。如果取出长度为a,b,c,d（a <= b < c = d）的四根木棒能构成正三角形，那么a + b = c = d。算法如下：
⑴枚举两根短的木棒a和b；

⑵当a <> b 时，组合的数量= 长度为a 的木棒根数×长度为b 的木棒根数×长度为(a+b)的木棒取两根的取法数量；

⑶当a = b 时，组合的数量= 长度为a 的木棒取两根的取法数量×长度为(a+b)的木棒取两根的取法数量。

如木棒长度分别为“1,1,2,2,3,3”，当a=1，b=2 时，则c=d= 3，该情况的组合数量=（长度为1 的根数）*（长度为2 的根数）*（长度为3 的根数取两根的取法数量）= 2 *2 * 1 = 4。长度为3 的根数取两根的取法数量，即

程序运行界面如图所示，在文本框Text1输入一堆木棒的长度，以逗号间隔，点击“计算”按钮Command1后在标签Label1显示方案总数。

请回答下列问题：

(1)、在文本框Text1中输入“2,3,3,6,6,6,7,”，能构成正三角形的取法数量是(填数字)

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

    Dim tmax As Integer, ans As Integer, k As Integer

    Dim i As Integer, a As Integer, b As Integer, tmp As Integer

    Dim c As String, s As String

    Dim t(20) As Integer

    '储存相同长度木棒的数量，如t(5)的值是长度为5的木棒的数量

    s = Text1.Text

    tmp = 0: k = 0

    ans = 0: tmax = 0

    For i = 1 To Len(s)

        c = Mid(s, i, 1)

        If c = "," Then

            k = k + 1

            t(tmp) =

            If tmp > tmax Then tmax = tmp

            tmp = 0

        Else

            tmp = tmp * 10 + Val(c)

        End If

    Next i

    For a = 1 To tmax \ 2      '枚举两根短的木棒

        For b = a To tmax

            If a + b > tmax Or t(a) * t(b) * t(a + b) = 0 Then Exit For

            If Then

                ans = ans + js(t(a), 2) * js(t(a + b), 2)

            Else

               ans = ans + js(t(a), 1) * * js(t(a + b), 2)

            End If

        Next b

    Next a

    Label1.Caption = "共有" + Str(ans) + "种方案"

End Sub

Function js(x As Integer, y As Integer) As Integer

    '计算在x个对象中取y个对象的组合数量，即

    '代码略。

End Function

查看解析
8、某夏令营按两门考试科目总分从高分到低分依次录取学生。如果录取学生的最后一名出现有总分并列的情况，则并列的学生全部录取。编写VB程序实现以上功能，程序运行时在列表框List1中显示全部学生的信息，在文本框Text1中输入计划招生人数，点击“录取”按钮Command1后，在列表框List2中输出录取的学生信息，并在标签Label1上显示最终录取的人数。程序运行界面如题图所示。

请回答下列问题：

(1)、如图所示，按钮Command1 上显示的“录取”是该按钮对象的（单选，填字母：A .对象名/B .属性名/C .方法名/D .属性值）

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

Dim xm(num) As String

Dim km1(num) As Integer, km2(num) As Integer

Private Sub Form_Load( )

    '读取num个学生的姓名、科目1、科目2的成绩，分别存储到数组xm、km1、km2。

    '在列表框List1中输出所有学生的姓名与成绩，代码略。

End Sub

Private Sub Command1_Click()

    Dim rs As Integer, count As Integer, flag As Boolean

    Dim i As Integer, j As Integer, t As Integer, tmp As String

    rs = Val(Text1.Text)

    List2.AddItem " 姓名科目1 科目2"

    count = 0: i = 1



    Do While i <= num And flag

        For j = num - 1 To i Step -1

            If Then

                tmp = xm(j): xm(j) = xm(j + 1): xm(j + 1) = tmp

                t = km1(j): km1(j) = km1(j + 1): km1(j + 1) = t

                t = km2(j): km2(j) = km2(j + 1): km2(j + 1) = t

            End If

        Next j

        flag = False

        If Or km1(i) + km2(i) = km1(i - 1) + km2(i - 1) Then

            count = i

            flag = True

        End If

        i = i + 1

    Loop

    For i = 1 To count

        List2.AddItem xm(i) + " " + Str(km1(i)) + " " + Str(km2(i))

    Next i

    Label1.Caption = "共录取学生" + + "人"

End Sub

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

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

图a

(1)、处理图像的部分界面如图a 所示。下列说法正确的有（多选，填字母）。

A、可对“山脉”图层直接设置滤镜效果 B、可使用画笔工具修改“背景”图层中的图像内容 C、可复制“蒲公英”图层的图层样式并粘贴到“云”图层 D、将作品存储为JPEG 格式文件，该JPEG 格式文件保留原作品的图层信息

(2)、制作动画作品的部分界面如第14 题图b 所示。“音乐”图层中声音的同步属性为“数据流”，为让音乐和“文字2”图层的补间动画同时结束，可在“音乐”图层第帧执行操作。

图b

(3)、“按钮”图层最后一帧设置了动作脚本“stop( )；”。测试影片时，“退出”按钮一开始就出现在舞台上，若要“退出”按钮仅最后一帧出现，在不影响其他动画效果的前提下，可行的操作有（多选，填字母）。

A、选中“按钮”图层第1帧，执行“删除帧”操作 B、选中“按钮”图层第1帧，执行“清除关键帧”操作 C、选中“按钮”图层第1至59帧，执行“删除帧”操作 D、选中“按钮”图层第1帧，删除其舞台上“退出”按钮实例 E、将“按钮”图层第1帧移动至第60帧，并在第60帧添加动作脚本“stop( )；”

(4)、放映影片时，单击当前场景中的“退出”按钮可关闭放映文件，则“退出”按钮上应添加的动作脚本是。

查看解析
10、小陈收集了2020年我国部分省份高等教育在校学生数统计的相关数据，并使用Excel软件对数据进行处理，如图a所示。

图a

请回答下列问题:

(1)、小陈已正确计算了华东和华南地区的“本科区域占比”。现要计算华北地区的“本科区域占比”，可在F13 单元格中输入公式，再利用自动填充功能完成区域F14:F17的计算。

(2)、根据图a中数据制作的图表如图b所示，创建该图表的数据区域是。

图b

(3)、小陈对工作表中的数据进行进一步处理，结合图a和图b，下列说法正确的有 (多选，填字母)。

A、修改D15单元格数据为651052，图b所示图表会随之改变 B、在“本科”列前插入一列，“本科区域占比”列的数值不会发生改变 C、以“区域”为华东、“本科本省占比”为最大1项进行筛选，筛选出的省份是上海 D、若要对华东地区的省份以“本科”为关键字升序排序，可选择排序的区域是B2:F8

查看解析
11、有如下VB 程序代码段：
i = 1: j = 10: c = 0

k = Val(Text1.Text)

Do While i <= j

    m = (i + j) \ 2

    c = c + 1

    If a(m) >= k Then

        j = m - 1

    Else

        i = m + 1

    End If

Loop

数组元素a(1)到a(10)的值依次为“1,4,10,21,21,26,27,29,30,36”，在文本框Text1中输入“21”，执行该程序段后，下列说法正确的是（    ）

A、变量i的值是3 B、变量j的值是4 C、变量c的值是4 D、变量m的值是3

查看解析
12、有如下VB程序代码段：
For i = 1 To 6

    a(i) = Int(Rnd * 10) + 10

Next i

For i = 1 To 3 Step 2

    For j = 6 To i + 2 Step -1

        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(6)各元素值可能的是（    ）

A、14 18 12 13 11 9 B、11 12 13 16 17 18 C、14 13 15 15 18 16 D、17 18 15 16 14 13

查看解析
13、下列VB程序段功能为：数组元素a(1)至a(20)中存储的是0-9之间的随机整数，查找在数组a中连续出现数字b的数组元素个数和起始位置，若有多个相同元素个数，则记录最后出现的起始位置。
b = 5

k = 0: imax = 0

For i = 1 To 20

    If a(i) = b Then

        k = k + 1

        If   ⑴   Then

            imax = k

              ⑵

        End If

    Else

        k = 0

    End If

Next i

Label1.Caption = "最大长度:" +Str(imax) +"，起始位置:" + Str(st)

划线处可选代码为：

①k > imax ② k >= imax ③ st = i - imax + 1 ④ st = i

下列选项中，代码顺序正确的是（    ）

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

查看解析
14、有如下VB 程序代码段：
s1 = "51577": s2 = "75929"

i = 1: j = 1: k = 0

Do While i <= Len(s1) And j <= Len(s2)

    c1 = Mid(s1, i, 1): c2 = Mid(s2, j, 1)

    If Abs(Val(c1) - Val(c2)) < 4 Then

        i = i + 1

    Else

        k = k + 1

    End If

    j = j + 1

Loop

执行该程序段后，变量k的值是（    ）

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

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

执行这部分流程，若输入n的值为22，则输出的t的值为（）

A、"1101" B、"1011" C、"10110" D、"01101"

查看解析
16、下列选项中，表达式的值与其他三项不同的是（）

A、Abs(Int(-1.5)) B、5 Mod 2 C、Int(Rnd + 1) D、Val(Mid("2021", 4, 1))

查看解析
17、将一幅未经压缩的1024×768 像素、256 级灰度的BMP图片，另存为512×384像素、黑白的BMP图片，转换前后两个文件的存储容量比为（）

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

查看解析
18、使用GoldWave软件编辑某音频文件，部分界面如图所示。

下列说法正确的是（）

A、当前状态下执行“删除”操作后，音频总时长减少3秒 B、当前状态下执行“剪裁”操作后，音频总时长变为3秒 C、当前状态下执行“静音”操作后，音频总时长减少3秒 D、当前状态下执行“插入静音”操作后（时长为3秒），音频总时长增加3秒

查看解析
19、使用UltraEdit软件观察字符“2020，武汉加油！”的内码，部分界面如图所示。

下列说法正确的是（）

A、图中内码表示的ASCII码字符共有6个 B、字符“!”的十六进制内码为A1 C、字符“3”的内码用二进制表示是“00110011” D、存储该段字符需要14个字节

查看解析

20、使用Access软件设计一个数据表，存储如图所示的学生消费记录数据。

序号	学籍号	姓名	金额	消费窗口	日期	是否住校
1	HZ20201121	沈宵阳	￥11.50	9	2021/5/17	是
2	HZ201801 13	王加娜	￥9.50	11	2021/5/17	否
3	HZ20200603	张颢琎	￥12.00	3	2021/5/18	否
…	…	…	…	…	…	…

下列表结构设计合理的是（）

A、

B、

C、

D、

查看解析

上一页 781 782 783 784 785 下一页跳转