- 二一组卷

题型：单选题题类：常考题难易度：困难

浙江省“温州十五校联合体”2018-2019学年高二下学期信息技术期中考试试卷

有如下VB程序段：

i = 1: j = 6: c = 0: f = False

key = Val(Text1.Text)

Do While i<= j And Not f

c = c + 1

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

If key = a(m) Then f = True

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

Loop

数组元素a(1)到a(6)依次为“8,23,25,32,46,57”，文本框Text1的内容为“32”。执行程序后，下列说法不正确的是（）

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

举一反三

【加试题】某数组有10个元素，依次为11、22、33、45、55、66、77、88、92、98，若采用对分查找法在该数组中查找数据92，依次被访问的数据为（）

【加试题】有1个升序排列的数组a(a(1)～a(n)，n≥3)，从左到右相邻两个元素的差值（后一个元素值减去前一个元素值）先由小到大、再由大到小，且相邻两个差值不相等，为了查找相邻两个元素的最大差值，小李编写的VB程序段如下：

i = 1 ：j = n

Do While i + 1 < j

m = (i + j) \ 2

If a(m + 1) - a(m) > a(m) - a(m - 1) Then

Else

End if

Loop

Label1.Caption="相邻两个元素的最大差值是" + Str(a(j) - a(i))

上述程序段两个方框处的语句分别为（）

有 VB 程序段如下：

a(1) = 2: a(2) = 2: a(3) = 5: a(4) = 6: a(5) = 7

Key = 2

i = 1: j = 5: flag = False Do While i <= j And Not flag

m = (i + j) \ 2 If Key = a(m) Then

s = "找到第" + Str(m) + "个" flag = True: Exit Do

ElseIf Key < a(m) Then j = m - 1

Else

i = m + 1 End If

s = Str(m) + s Loop Label1.Caption = s

执行该程序段后，在标签 Label1 中显示的内容是（）

编“字符串缩写”程序，实现如下功能:在文本框Text1中输入Ascii字符串，字符串中如果有由Ascii表中相邻字符（升序）组成的子串，则把该子串缩写成由第一个字符、“-”和最后一个字符组成，比如“abcdfpxcba”则缩写成“a-dfpxcba”。程序运行界面如下图所示。

用以下对分查找算法:在一个包含有重复元素且从小到大排序(相等元素排在一起)的整数数组a中，查找某个重复出现的整数key，其中数组元素的总个数是n。

i=1: j=n

Do While i <=j

m=(i+j) \ 2

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

Else

j=m-1

End If

Loop

那么执行该程序后，下列说法正确的是（）

老张要准备一道晚宴，需要上n个菜，为了省事他在n个不同的餐厅订好了这些菜。现在他需要尽快取回这些菜，对于每一道菜，有两种取菜方式：

1)让各店的外卖员送货上门，对于第i个菜需要花费a(i)的时间。

2)自己去餐厅取回家，每次出门仅能取回一道菜，对于第i个菜，从出门到回家整个过程需要花费b(i)的时间。

每家餐厅都有各自的外卖员送菜，并且无论老张是否在家，他们都能把菜送到。为了节省时间，能由外类员送的菜尽量由外卖负各自送达，现在需要知道最少花费多少时间能集齐所有的菜。

比如n=4，a(i)=(30，70，40，50)，b(1)=(20，10，20，30}，那么花费时间少的方案是第一个菜和第三个菜让让外卖员送，第二个菜和第四个菜老张自己取，一共需要40分钟。

设计VB程序计算最少时间，界面如下图

实现上述功能的VB程序如下，回答以下问题：

相关试卷

公司介绍

服务介绍

帮助中心