- 二一组卷

题型：单选题题类：模拟题难易度：困难

浙江省湖州、衢州、丽水三地市2020届高三上学期信息技术11月教学质量检测试卷

给定含有n个正整数元素的数组a，将其分成连续的k(1<k≤n)段，有多种分法，每种分法中各段和均有最大值，找出这些最大值中最小的一个并输出。如n的值为5，k的值为3，数组元素a(1)到a(5)依次为“1，2，3，3，1”，其中分法{1，2}{3}{3，1}各段和的最大值为4，比其他分法的最大值小，4就是输出值。寻找最小值的部分代码如下：

a(1)=1：a(2)=2：a(3)=3：a(4)=3：a(5)=1

n=5：k=3

L=3：R=10 ‘L值可以为数组元素最大值，R可以为数组所有元素和

Do While L+1<R

m=(L+R)\2

t=0：s=0

For i=1 To n

If t+a(i)>=m Then

s=s+1

t =a(i)

Else

t =t+a(i)

End If

Next i

If t>0 then s=s+1

If s<=k Then① Else ②

Loop

Label1.Caption=“最小值为”&Str(L)

要使程序实现上述算法思想，则代码中①②处应为（）

A、①R=m ②L=m B、①L=m ②R=m C、①R=m+1 ②L=m-1 D、①L=m+1 ②R=m-1

举一反三

【加试题】有如下VB程序段：

Dim a(5) As Integer

Dim i As Integer, j As Integer, t As Integer

a(1) = 52: a(2) = 15: a(3) = 37: a(4) = 22: a(5) = 35

i = 1

Do While i < 5

t = i: j = i + 1

Do While j <= 5

If a(j) > a(t) Then t = j

j = j + 1

Loop

x = a(t): a(t) = a(i): a(i) = x

i = i + 1

Loop

Text1.Text = Str(a(2))

运行该段代码后，文本框Text1中显示的内容为（）

【加试题】下列程序执行后文本框 Text1 显示的内容是（）

s = "ERROR:Divisor must not be zero!"

flag = False : m = 0

For i = 1 To Len(s)

ch = Mid(s, i, 1)

If ch >= "a" And ch <= "z" Then

If Not flag Then

m = m + 1 ： flag = True

End If

Else

flag = False

End If

Next i

Text1.Text=Str(m)

填空题

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

采用如下对分查找算法对数组a中7个有序数据“about、count、end、fly、high、jack、month”进行查找。

i=1:j=7:x=“high”

Do While i <=j

m=(i+j)\2

If a(m)=x Then Exit Do

If a(m) > x Then

j=m-1

Else

i=m+1

End If

Loop

执行完上述代码后，根据最终变量值判断下列表达式，其中成立的是（）

幻方是一种将数字安排在正方形格子中，使每行、列和对角线上的数字和都相等的方法。n阶幻方是由1~n²之间的自然数组成的一个n阶方阵，其各行、各列及对角线所含的数字之和均相等。例如3阶幻方(如图1)，幻和为15。

奇数阶幻方的构造是所有幻方中最简单的，可以按照如下规则来实现：

⑴将1放在第一行中间一列；(如图2)

⑵从2开始直到n*n为止，各数按下列规则存放：

假设当前要存放的数为k，则k存放在k-1)数的右上方并按照规则

①若(k-1)放在第1行且不是最后一列，则将k存放在n行，(k-1)所在列右侧；(如图3)

②若(k-1)放在第n列且不是第一行，则将k存放在第1列，k-1)的上1行；(如图4)

③若(k-1)即不在第1行也不在最后1列：

若(k-1)右上方有数，则将k放在(k-1)的下1行的同一列。(如图5)

若(k-1)右上方没有数，则将k放在(k-1)的右上方；(如图6)

④若(k-1)在第1行第n列，将k填在(k-1)的正下方(如图7)

相关试卷

公司介绍

服务介绍

帮助中心