相关试卷

1、下列有关网页和浏览器的说法，正确的是（）

A、网页中的图像不能设置超链接 B、HTTP协议用于浏览器与Web服务器之间的信息传输 C、网页必须同时具备文本、图形图像和超链接这三种基本元素 D、在IE浏览器中，使用“添加到收藏夹”功能可以保存正在浏览的网页内容

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

A、计算机中存储的数据是信息 B、广播、电视都是常见的信息表达方式 C、可以利用信息技术把信息从一种形态转换为另一种形态 D、信息技术是伴随着计算机和互联网技术的发展而诞生的

查看解析
3、学校心理活动节举办“两人三足跑”比赛，比赛规则为：
⑴起点与终点之间共有10 个站点（包括起点与终点），依次为站点1、站点2……、站点10。参赛选手均从起点（站点1）出发，最先恰好到达终点（站点10）的一组选手为胜；

⑵对“恰好到达终点”的界定。比赛前，参赛选手随机抽取一个行进方案，该方案由5个正整数（范围为1～6）组成，表示参赛选手整个行程分5 个阶段完成，并规定了每个阶段能行进的站点数。若某一阶段按所给站点数行进还未到达终点，则向前（终点方向）行进；若某一阶段按所给站点数行进超过终点，则要折回直至行进完所给站点数；前四个阶段不出现按所给站点数行进恰好到达终点的情况，直至行进满五个阶段，且第五阶段按所给站点数行进恰好到达终点，则称为“恰好到达终点”。如方案“3,1,6,4,3，”满足“恰好到达终点”，按该方案行进的过程如图a所示：

组织方为了验证设计方案，编写了如下VB 程序：在文本框Text1 中输入待检验的方案（输入1～6 范围内的整数并以逗号分隔，且以逗号结束。例如：“3,1,6,4,3,”），单击“验证”按钮Command1，判断方案是否能恰好到达终点。若能，在标签Label2中显示“可行方案！”；若不能，则显示“不可行方案！”。程序界面如图b所示。

(1)、若对方案“5,2,6,3,1,”进行验证，则该方案的验证结果是。

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

Private Sub Command1_Click( )

    Dim a(1 To n)As Integer     '表示每一个起点距离终点的站点数

    Dim b(1 To 5)As Integer

    Dim start As Integer, cnt As Integer, endsAs Integer

    Dim i As Integer, j As Integer, c As String, sAs String

    Dim flag As Boolean

    s = Text1.Text: j = 1

    For i = 1 To n

        a(i) = n - i

    Next i

    For i = 1 To Len(s)

        c = Mid(s, i, 1)

        If c = "," Then



        Else

            b(j) = Val(c)

        End If

    Next i

    cnt = 1: flag = True

    start = 1: ends = 0

    i = 1

    Do While flag = True And i <= 5

        If b(i) = a(start) Then

            flag = False

        Else

            ends = start + b(i)

            start = adjust(ends)

            cnt = cnt + 1

        End If

        i = i + 1

    Loop

    If Then

        Label2.Caption = "可行方案！"

    Else

        Label2.Caption = "不可行方案！"

    End If

End Sub

'adjust函数的作用是：根据参数ends的值来调整start的值

Function adjust(endsAs Integer) As Integer

    Dim start As Integer

    If ends < n Then start = ends Else start =

    adjust = start

End Function

查看解析
4、为了把工厂中高低不等的物品按从低到高排好序，工程师发明了一种排序机械臂，它首先在参加排序的所有物品中同时选出高度最低和最高的物品，分别交换到左、右边界，再缩小左、右边界，然后在余下的物品中采用同样的方法排序，直到所有物品成为一个有序的序列。编写VB 程序，实现上述排序功能：运行程序，单击“读取”按钮Command1，在列表框List1中显示待排序的物品，然后单击“排序”按钮Command2，在列表框List2中显示排序好的物品。程序运行界面如图所示。

请回答下列问题：

(1)、若要程序运行时,窗体Form1 的标题显示为“物品排序”，则Form_Load()事件中应添加的代码是（单选，填字母：A .Form1.Name="物品排序" /B .Form1.Text = "物品排序"/C .Form1.Caption ="物品排序"）。

(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。
Const m = 9      'm表示物品个数

Dim id(m) As Integer, gd(m) As Integer

Private Sub Command1_Click()

    '读取物品的信息依次存入数组id，gd中，并在列表框List1中显示，代码略

End Sub

Private Sub Command2_Click( )

    Dim LAs Integer, R As Integer, t As integer

    Dim imin As Integer, imax As Integer

    L = 1: R = m            '分别指向待排序区间的左右边界

    Do While L < R

        imin = L



        For i = L + 1 To R

            If Then imax = i

            If gd(i) < gd(imin) Then imin = i

        Next i

        t = id(imin): id(imin) = id(L): id(L) = t

        t = gd(imin): gd(imin) = gd(L): gd(L) = t

        If imax = L Then     '考虑最大值恰好在L位置的情形

        t = id(imax): id(imax) = id(R): id(R) = t

        t = gd(imax): gd(imax) = gd(R): gd(R) = t

        L = L + 1



    Loop

    For i = 1 To m

        List2.AddItem Str(id(i)) + " " + Str(gd(i))

    Next i

End Sub

a(i) = n - i

Next i

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

查看解析
5、小李使用Flash软件创作题为“低碳出行”的多媒体作品，请回答下列问题：

(1)、下列有关多媒体作品制作流程的说法，正确的是（多选，填字母）。

A、考虑作品的社会和经济效益属于创作需求分析 B、了解用户的计算机应用水平属于应用需求分析 C、作品的系统结构设计描述了整个作品的组成部分、工作流程和主要界面 D、确定作品素材的获取方式和加工方式，需要在模块设计中完成 E、制作脚本是多媒体作品制作的直接依据

(2)、制作“自行车”动画时，第15帧和第25帧中实例的部分属性界面如图b所示，可推测“自行车”移动方向是（单选，填字母：A .水平向右/B .垂直向上/C .水平向左/D .垂直向下），该动画类型为（选填：形状补间/动画补间）

(3)、如图a所示，“蝴蝶图层”第1帧到第40帧实现了蝴蝶从舞台右上方飞向舞台左下方的动画效果，为使“蝴蝶”图层的动画从第10帧开始出现，且动画时长保持不变，正确的操作是（多选，填字母）

A、将“蝴蝶”图层第1帧至第40帧整体移动到第10帧至50帧 B、选中“蝴蝶”图层第40帧执行清除关键帧操作，再将第1帧移动至第10帧 C、将“蝴蝶”图层第1帧移动到第10帧，再选中第30帧至第40帧执行插入帧操作 D、删除“蝴蝶”图层第1帧至第9帧，再将第40帧移动至第50帧

(4)、测试影片时，单击当前场景中的“播放”按钮，影片跳转到“ditan”场景第1帧并停止播放，则“播放”按钮的动作脚本为。

查看解析
6、使用Excel软件处理2020年度浙江省地区生产总值和增长速度相关数据，如图a所示。

请回答下列问题：

(1)、B14单元格计算了2020年第一季度各产业的生产平均值，C14:K14的值由B14单元格通过自动填充得到，则J14单元格中的公式为。

(2)、对各产业数据以“2020 年第四季度”的“绝对值(亿元)”为关键字按升序排序，则排序的数据区域是。

(3)、根据图a中部分数据创建了如图b所示的图表，结合图a和图b，下列描述正确的有（多选，填字母）

A、对区域A1:K1执行“合并单元格”操作，合并后的单元格名称为A1 B、若B5 单元格的数据修改为“500”，则图表会随之发生改变 C、生成图b 所示的图表的数据区域为A2，A5:A10，F2:F3，F5:F10 D、若对区域B4:K14设置单元格格式为保留0位小数，则图表不会随之发生变化

查看解析
7、某查找算法的VB 程序段如下：
Dim a(1 To 10) As Integer

Randomize

n = 0

i = 1: j = 10

Key = Int(Rnd * 25) * 2 + 1

Do While i <= j

    m = Int((i + j) / 2)

    If Key = a(m) Then Exit Do

    If Key > a(m) Then

        i = m + 1: n = n * 2 + 1

    Else

        j = m - 1: n = n * 2 - 1

    End If

Loop

数组元素a(1)到a(10)的值依次为“5,8,11,18,23,29,33,42,45,51”。执行该程序段后，n的值不可能的是（    ）

A、15 B、7 C、3 D、-1

查看解析
8、对一组数据采用冒泡排序算法进行排序，若第一趟排序完成后的数据序列为：31,24,23,15,20,10，则该数据序列的原始顺序不可能的是（）

A、24 23 15 31 10 20 B、24 23 15 20 31 10 C、24 31 15 23 20 10 D、23 24 15 20 31 10

查看解析
9、有如下VB 程序段：
s=Text1.Text: n=len(s): y=" "

For i = 1 To n\2

    If Mid(s, i, 1) = Mid(s,n-i+1,1) Then

        y = Str(i)+y

    End If

Next i

若在文本框Text1中输入字符串“abc2008cba”，则y的值为（    ）

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

查看解析
10、有如下VB 程序段：
c =0: k = 1

For i = 2 To 10

    If i Mod 2 <> 0 And a(k) < a(i) Then

        k = i

        c = c + 1

    End If

Next i

数组元素a(1)到a(10)的值依次为“12, 33, 14, 6, 7, 23, 25, 37, 34, 40”，执行该程序段后，变量k和c的值分别为（    ）

A、9 3 B、10 3 C、5 1 D、4 2

查看解析
11、某算法流程图如图所示：

若输入m和n的值分别为30和12，则执行这部分流程后，变量m的值为（）

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

查看解析
12、若x=20，y=21，有VB表达式：
① x<>y And x<y

② "x" + "y" = "41"

③ x / 10 * y = x * y \ 10

④ x \ 10 = y Mod 2

⑤ Int(Sqr(x+y))=6

上述表达式的值为True的有（）

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

查看解析
13、一段时长为10秒、1024×768像素、PAL制式（25 帧／秒）的未经压缩的AVI格式无声视频，其存储容量约为188MB，则该视频的颜色位深度是（）

A、4 位 B、8 位 C、16 位 D、24 位

查看解析
14、用Photoshop软件制作“端午佳节”作品，界面如图所示。

下列说法正确的是（）

A、交换“香囊”图层与“粽叶”图层的顺序，不影响图像最终显示效果 B、无法使用“自由变换”操作调整“粽子2”图层内容的大小 C、利用填充工具，可以直接更改“诗句”图层中“端午”两字的颜色 D、若将该作品保存为BMP格式图像，其位深度为8bit

查看解析
15、使用UltraEdit 软件观察字符“2021，中国Lucky.”的内码，部分界面如图所示。

下列说法正确的是（）

A、存储该字符串的内码共需要15个字节 B、该字符串中共有4个GB2312字符 C、字符“.”内码用十六进制表示为79 2E D、字符“f”的二进制编码是01100110

查看解析

16、用Access软件设计某图书畅销信息系统的数据库，其中已建好的“小说畅销表”数据表用于存储如图所示的数据。

序号	书名	作者	价格	出版时间	是否五星推荐
1	文城	余华	59	2021年3月	是
2	云边有个小卖部	张嘉佳	42	2018年7月	否
2	活着	余华	35	2017年6月	是
……	……	……	……	……	……

下列关于“小说畅销表”数据表的描述，正确的是（）

A、该数据表的字段顺序与图中数据的列顺序必须一致 B、该数据表的价格字段数据类型可以设置为“货币” C、该数据表中必定有一个字段的字段名为“出版时间” D、该数据表保存后表名不可修改

查看解析

17、下列有关网页与浏览器的说法，不正确的是（）

A、网页内容可以用HTML（超文本标记语言）来进行描述 B、网页的三种基本元素为文字、图形图像和超链接 C、在IE 浏览器中，以“网页，仅HTML”类型保存网页，可以保存网页中的图像 D、浏览器中的收藏夹保存的是网页的URL

查看解析
18、下列关于信息与信息技术的描述，正确的是（）

A、信息在传递和共享的过程中会产生损耗 B、信息不可以脱离它所反映的事物被存储、保存和传播 C、计算机的发明，促使了信息技术的产生 D、信息是事物的运动状态和关于事物运动状态的描述

查看解析
19、现有如下问题，在一个6×6的跳棋棋盘上放置6个棋子，使得每行、每列，每条斜线上至多有一个棋子，请问有几种不同的摆法。为了方便处理，可将棋盘模拟成6*6的正方形矩阵，如第1图a所示。该矩阵中从左往右列号依次1，2，3，4，5，6，从上往下行号依次为1，2，3，4，5，6。若在位置（1,2）（指第一行第二列）中放置了一个旗子，则第一行，第二列以及该位置所在的左斜线与右斜线均无法放置其他棋子。

图a

解决该问题的算法思想如下：

①从第一行开始逐行放置棋子。

②每行从左到右逐列尝试放置棋子，放置之前与已放置的棋子作比对。

③若无冲突，放置该行棋子并跳转至下一行。

④若有冲突，则在本行中向右继续寻找放置棋子的位置，若找不到则返回上一行，重新寻找棋子放置位置。

⑤最后一行放置结束，输出一种方案并继续寻找下一方案。用 VB程序实现该算法，程序界面设计如图b所示。

图b

(1)、若第一行的棋子放置在第三列，则第二行不能放置棋子的列的数量为。（填个数）

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

Dim a(1 To n) As Integer

Dim m As Integer

Private Sub Command1_Click( )

    Dim i As Integer, j As Integer m = 0

    For i = 1 To n

        a(i) = 0    'a(i)存储第 i 行放置棋子的列号

    Next i

    For i = 1 To n + 1

        If i = n + 1 Then    '所有行棋子放置完毕，输出一种方案

            m = m + 1

            s = ""

            For j = 1 To n

                s = s + Str(j) + ":" + Str(a(j)) + "|"

            Next j

            List1.AddItem s

            i = i - 2

        Else         '寻找下一行棋子放置位置

            j = a(i) + 1

            Do While j <= n And check(i, j) = False



            Loop

            If j <= n Then

                a(i) = j

            Else

                a(i) = 0



                If i < 0 Then Exit For

            End If

        End If

    Next i

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

End Sub

'判断当前放置的棋子与已放置有无冲突

Function check(i As Integer, j As Integer) As Boolean check = True

    For k = 1 To i - 1

    If a(k) = j Or j + i = a(k) + k OrThen

        check = False

    End If Next k

End Function

查看解析
20、一个含有n个元素的整数数组，如果数组两个连续元素之间差的绝对值包括了[1,n-1]之间的所有整数，则称之为一组“完美跳数”。小余制作了验证完美跳数的VB程序，功能如下：在文本框Text1中输入一组以逗号分隔且以逗号结尾的整数数组，单击“验证”按钮Command1，在标签Label1中显示验证结果，运行界面如图所示。

Private Sub Command1_Click()

    Dim n As Integer, i As Integer, j As Integer

    Dim a(1 To 100) As Integer, b(1 To 100) As Integer Dim s As String, chr As String, temp As String

    s = Text1.Text

    i = 1: n = 0

    Do While i <= Len(s)

        ch = Mid(s, i, 1)

        If ch >= "0" And ch <= "9" Then

            temp = temp + ch

        Else

            n = n + 1

               ①

            temp = ""

        End If

      i = i + 1

    Loop

    For i = 2 To n

         ②

    Next i

    For i = 1 To n - 2

        For j =

            If b(j) < b(j - 1) Then

                t = b(j): b(j) = b(j - 1): b(j - 1) = t

            End If

        Next j

    Next i

    For i = 1 To n - 1

        If b(i) <> i Then Exit For

    Next i

    If i = n Then Label1.Caption = "完美跳数" Else Label1．Caption = "非完美跳数"

End Sub

(1)、观察程序界面，具有Caption属性的对象有个。（填个数）

(2)、请在上述程序的划线处填上合适的代码。
① ②

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

查看解析

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