相关试卷

1、收集某中学两个班级体质健康测试数据，并对部分项目用Excel软件进行数据处理，如图a所示。

请回答下列问题：

(1)、区域G3：G82的数据是通过公式计算得到的，在G3单元格中输入公式，再使用自动填充功能完成区域G4：G82的计算。（提示：体重指数=体重/身高² ，单位：千克/米²）

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

A、更新C列身高数据，G列体重指数的值会随之改变 B、为了将女生身高最高的数据显示在当前工作表第3行，可选择身高为主要关键字、性别为次要关键字均按降序排序 C、为了显示男生1000/800米得分大于85的数据，可先对“性别”进行筛选，选择的值为“男”，再对“1000/800米得分”进行筛选，条件为大于85 D、为了显示女生肺活量得分最高的3位学生数据，可先对“性别”进行筛选，选择的值为“女”，再对“肺活量得分”进行筛选，选择“10个最大的值”并显示最大的3项

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

查看解析
2、如下VB程序段实现对数组元素a（1）到a（10）从小到大排序。
i=1

Do While i<10

k=i：i=10

For j=10 To k + 1 Step -1

If a（j）<a（j-1） Then

t=a（j）：a（j）=a（j-1）：a（j-1）=1

①

End If

Next j

Loop

则代码中①处的语句可为（）

A、i=i+1 B、i=j+1 C、i=k-1 D、i=j

查看解析
3、有如下VB程序段：
a（1）=“ABC”：a（2）=“DEF”：a（3）=“GHI”

s1=“31，12，23，33”：s2=“”

For i = 1 To Len（s1）

ch = Mid（s1，i，1）

If ch < > “，” Then

i=i+1

p=Val（Mid（s1，i，1））

s2=s2+Mid（a（p），Val（ch），1）

End If

Next i

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

A、“CDHI” B、“GBFI” C、“CDH” D、“GBF”

查看解析
4、某对分查找算法的VB程序段如下：
i=1：j=30

m=（i+j）\2

Do While i < = j And key < > a（m）

If key >a（m） Then i = m+1 Else j = m-1

m=（i+j）\2 ①

Loop

数组元素a（1）到a（30）各不相同且按升序排列，若查找键key与a（9）相等，执行该程序段，①处语句的执行次数是（）

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

查看解析
5、有百位和十位未知的5位整数“22**6，能被37或67整除。以下VB程序段的功能是：在满足条件的所有数中，将最大一个5位数的百位和十位依次显示在文本框Text1中。
i=100：flag=False

Do While i>0 And Not flag



Loop

Text1. Text = Str（i\10）+Str（i Mod 10）

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

①j=22006+i*10    ②i=i-1 ③If（j Mod 37）*（j Mod 67）=0 Then flag = True

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

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

查看解析
6、某算法的部分流程图如图所示。执行这部分流程，若输入n的值为20，则输出a，b的值分别是（）

A、12，10 B、10，9 C、9，15 D、9，10

查看解析
7、VB表达式-3^2+14\4*3的值是（）

A、-8 B、0 C、10 D、18

查看解析
8、一幅未经压缩的2048×1536像素、24位色BMP图像，要将其存储容量减少到约1.5MB，在不改变其他参数的前提下，可调整图像大小、颜色分别为（）

A、1024×768像素、16色 B、1024×768像素、16位色 C、512×384像素、256色 D、512×384像素、24位色

查看解析
9、用Photoshop软件制作“春来了”作品，部分编辑界面如图所示。下列说法错误的是（）

A、“背景”图层的不透明度不可以更改为50% B、“花朵”图层的名称可更改为“郁金香” C、“来了”图层中的文字可用橡皮擦工具直接擦除 D、对“蝴蝶”图层执行“复制图层”操作，可产生一个“蝴蝶副本”图层

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

A、十六进制数82H与十进制数82的值相等 B、根据GB2312-80标准，“信息”两字的内码共占2个字节 C、已知大写字母“X”的ASCII码值为58H，则大写字母“Z”的ASCII码值是60H D、某7位二进制数的最高位为1，将其转换为十进制数后的值大于等于64

查看解析
11、使用Access软件编辑某班级图书管理数据库，该数据库当前仅包含“班级藏书”一个数据表，部分界面如图所示。

下列说法正确的是（）

A、该数据库中不可以创建一个表名为“借阅人”的数据表 B、“收藏日期”字段的数据类型是“日期/时间” C、可以将“班级藏书”数据表导出为Excel文件 D、若添加一条新记录，则该记录中“书籍编号”字段的值为2

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

A、HTTP协议用于浏览器与Web服务器之间的信息传输 B、收藏夹中的网址可以重命名，但不能被删除 C、在IE浏览器中，保存一个网页不可能得到多个文件 D、使用不同的搜索引擎搜索同一关键词，搜索的结果是相同的

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

A、5G技术的出现使信息可以脱离载体传播 B、计算机处理信息是通过执行程序完成的 C、智能处理得到的信息都是真实、可信的 D、当今社会信息时时处处都有，因而不再是人类的重要资源

查看解析
14、某物品柜有5层，每层有10个格子，每个格子只能放一个物品。第1层格子编号依次为1到10，第2层格子编号依次为11到20，依此类推。有9组物品（组号1~9），每组有2到8个物品，物品总数不超过50个。将9组物品按组号由小到大依次放入柜中，放置方式有两种：
1）整体放置。按格子编号由小到大的次序查找第一个可放置该组全部物品的空区域（空区域是指从某个空格子开始的同层连续的所有空格子），若找到，则在该空区域居中、连续放置该组全部物品，如图a所示。

2）零散放置。若所有空区域格子数都小于该组物品数，则将该组每个物品依次放置在当前编号最小的空格子中，如图b所示。

编写VB程序，模拟物品放置。运行程序，在列表框List1中显示每组物品的组号和数量，单击“放置”按钮Command1，在列表框List2中显示每组物品放置结果。程序运行界面如图c所示。

图c

(1)、若第1、第2组的物品数分别为6和2，则放置第2组物品的格子编号依次为。

(2)、实现上述功能的VB程序如下，请在划线处填入合适的代码。
Constm ＝ 50     'm表示物品柜的格子数

Const w ＝ 10    'w表示物品柜每层的格子数

Const n ＝ 9    'n表示物品的组数

'f（i）存储第i个格子开始的同层连续的所有空格子数。f（i）为0表示第i个格子不是空格子

Dim f（m）As Integer

Dim a（n）As Integer

Private Sub Form_Load( )

'读取各组物品的个数依次存入数组a，并在List1中显示

'代码略

End Sub

Function getpos（r As Integer As Integer

'按格子编号从小到大的次序，查找空格子数≥r的第一个空区域

'若找到，返回该空区域的起始编号，否则返回 -1

'代码略

End Function

Private Sub Command1_Click( )

    Dim i As Integer，j As Integer， k As Integer，p As Integer，v As Integer

    Dim s As String

    For i ＝ 1 To m

        f（i）＝ w -（i -1）Mod w     'w为10，表示每层的格子数

    Next i

    v ＝ 1

    For i ＝ 1 To n

    s ＝ ""

    p ＝

    If p ＝ - 1 Then

        j ＝ 1

        Do While j ＜＝ a（i）

            If f（v）＜＞ 0 Then

                s ＝ s ＋ Str（v）

                f（v）＝

                j ＝ j ＋ 1

            End If



        Loop

    Else

        k ＝（f（p）- a（i）） \ 2

        For j ＝ k To 1 Step - 1

            f（p）＝ j

            p ＝ p ＋ 1

        Next j

        For j ＝

            f（j）＝ 0

            s ＝ s ＋ Str（j）

        Next j

    End If

    List2. AddItem "第" ＋ Str（i）＋ "组：" ＋ s

    Next i

End Sub

查看解析
15、根据申请人的QA和QB值，从m个申请人中挑选2人组队参加某挑战赛。条件一是2人的QA值都必须大于指定参数h；条件二是2人的QA值之差（较大值减较小值）小于h。在满足上述两个条件的所有2人组合中，挑选QB值之和最大的一个组合。（QA、QB和h的值均为正整数）
编写VB程序，实现上述挑选功能。运行程序，在文本框Text1中输入参数h后，单击“挑选”按钮Command1，在列表框List1中按QA值降序显示满足条件一的申请人信息，最后在标签Label1中显示组队结果。程序运行界面如图所示。

请回答下列问题：

(1)、若要清空列表框List1，能实现该功能的语句是（单选，填字母：A .List1. Caption ＝ "" / B .List1.Text ＝ "" / C .List1. Clear）。

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

Dim id（m）As Integer, qa（m）As Integer, qb（m）As Integer

Private Sub Command1_Click( )

    Dim i As Integer j As Integer, k As Integer, t As Integer, max As Integer

    Dim h As Integer, n As Integer       '变量n存储满足条件一的申请人个数

    Dim s As String

    '读取全部申请人的编号、QA和QB值，分别存入数组id、qa和qb，代码略

    h ＝ Val（Text1. Text）：n ＝ m

    For i ＝ 1 To m — 1

        k ＝ i

        For j ＝ i ＋ 1 To m

            If qa（j）＞ qa（k）Then k ＝ j

        Next j

        If Then

            If k ＜＞ i Then

                t ＝ qa（i）：qa（i）＝ qa（k）：qa（k）＝ t

                t ＝ qb（i）：qb（i）＝ qb（k）：qb（k）＝ t

                t ＝ id（i）：id（i）＝ id（k）：id（k）＝ t

            End If

        Else

            n ＝

            Exit For      'Exit For表示退出循环

        End If

    Next i

    '满足条件一的申请人信息显示在列表框Listl中，代码略

    max ＝ 0：s ＝ “没有满足条件的组合”

    '在满足条件的组合中，寻找QB值之和最大的组合，若有并列，只保留第一个

    For i ＝ n To 2 Step - 1

        j ＝ i - 1

            Do While

                If qb（i）＋ qb（j）＞ max Then

                    s ＝ "组队结果：" ＋ Str（id（i））＋ "号，" ＋ Str（id（j））＋ "号"



            End If

            j ＝ j - 1

        Loop

    Next i

    Label1. Caption ＝ s

End Sub

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

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

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

图a

A、将“背景.psd”文件存储为BMP格式后，BMP文件包含“山脉副本”图层的内容 B、能将“天空”图层移动到“背景”图层的下方 C、将“白云”图层的不透明度改为40%，会影响图像的呈现效果 D、可复制“山脉”图层的图层样式并粘贴到“树林”图层 E、将“图像大小”改为550×400像素后，所有图层中内容的大小均发生变化

(2)、制作动画作品的部分界面如图b所示。在“控制”图层的第帧插入关键帧后，测试场景，该图层的声音在场景动画播放两秒后停止播放。由此可见，“控制”图层中声音的同步属性为（选填：事件/开始/数据流）。

图b

(3)、在“控制”图层的第60帧上添加了动作脚本“stop( )”，该帧中的“海洋”按钮实例上添加的动作脚本是“on（release）{gotoAndStop（“海洋”，1）；play( )；}”。将该按钮实例上的动作脚本：替换为（多选，填字母）后，按钮实现的交互效果不变。

A、on（release）{play( )；} B、on（release）{play（“海洋”，1）；} C、on（release）﹛gotoAndPlay（1）；） D、on（release）﹛gotoAndPlay（“海洋”，1）；}

(4)、“蝴蝶”图层中的蝴蝶是由“蝴蝶飞舞”元件所生成的实例，该元件部分编辑界面如图c所示，各关键帧中内容均为形状，实现了蝴蝶翅膀扇动一次的动画效果。测试场景时，动画中蝴蝶的翅膀仅扇动了一次，可能的原因是。

图c

查看解析
17、王老师收集了学校男生寝室三项检查成绩的数据，并使用Excel软件对数据进行处理，如图a所示。

图a

请回答下列问题：

(1)、区域L4：L93的数据是通过公式计算得到的，在L4单元格中输入公式，再使用自动填充功能完成区域L5：L93的计算。（提示：总分＝内务分×20%＋卫生分×30%＋纪律分×50%）

(2)、寝室号的编制规则是：楼号（第1字符）＋楼层号（第2字符）＋房间号（第3、4字符）。若要筛选出各男生寝室楼的3楼寝室，筛选方式设置如图b所示，则①处应为（选填：包含/等于/开头是）。

图b

(3)、在新工作表中计算各年级“内务分”、“卫生分”和“纪律分”的平均分后，创建了如图c所示的图表。结合图a和图c，下列说法正确的有（多选，填字母）。

图c

A、由图c可知男生寝室纪律最好的是高三，内务和卫生最好的是高二 B、更新数据导致高一“内务分”的平均分发生变化，图表不会随之改变 C、对区域L2：L3执行“合并单元格”操作，合并后的单元格名称为L2 D、在图a所示工作表的“寝室号”列前插入一列，“总分”列的数值会发生改变

查看解析
18、某对分查找算法的VB程序段如下：
'随机产生包含20个整型元素的升序序列，依次存入数组a.代码略

i ＝ 1：j ＝ 20：s ＝ ""

key ＝ Val（Text1. Text）

Do While i ＜＝ j

    m ＝（i ＋ j）\2

    s ＝ s ＋ Str（a（m））

    If a（m）＝ key Then Exit Do       'Exit Do表示退出循环

    If a（m）＞ key Then j ＝ m - 1 Else i ＝ m ＋ 1

Loop

Text2. Text ＝ s

在文本框Text1中输入待查找数，执行该程序段后，下列选项中，文本框Text2中显示的内容不可能的是（    ）

A、78 50 46 33 B、51 37 41 48 C、74 50 46 51 D、73 83 87 89

查看解析
19、采用冒泡排序算法对某数据序列进行排序，经过第一轮排序后的结果是“2，8，3，9，5，6，7”，那么原数据序列不可能的是（）

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

查看解析
20、有如下VB程序段：
s1 ＝ "BGR"： s2＝ "VBPROGRAM"

i ＝ 1：j ＝ 1：s3 ＝ ""

Do While i ＜＝ Len（s1） And j ＜＝ Len（s2）

    If Mid（s1，i，1）＝ Mid（s2，j，1）Then

        i ＝ i ＋ 1

    Else

        s3 ＝ s3 ＋ Mid（s2，j，1）

    End If

    j ＝ j ＋ 1

Loop

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

A、"VPO" B、"VPRO" C、"VPOAM" D、"VPROAM"

查看解析

上一页 802 803 804 805 806 下一页跳转