n=6:i=1
Do While i<= 3
k=i:j=i+1
Do While j<=n
If a(j) <a(k) Then k=j
j=j+1
Loop
If i<>k Then
t=a(i):a(i)=a(k):a(k)=t
End If
i=i+1
Loop
数组元素a(1)到a(6)的值依次为“1,6,5,3,4,2”,则该程序段运行后,数组元素a(1)到a(6)的值依次为( )
x=int(input("请输入要查找的1000以内的整数:"))
step=0
flag1=1
flag2=1000
while(flag1<=flag2):
mid=①
step=step+1
if mid>x:
flag2=②
elif mid<x:
flag1=③
else:
break
print("查找次数为:",step)
input("运行完毕,请按回车键退出...")
下列说法正确的是( )
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 中显示的内容是( )
若用Excel图表来体现各学历水平分布的比例,较合适的图表类型是( )
⑴将数组a中的n个元素依次分割出若干个数据块,每个数据块有2m个元素,分割时,按尽可能大的数据块进行分割。
⑵对每个分割出的数据块进行求和,将和依次存储在数组b中。
例如:n=13,可将a(1)~a(13)依次分割成3个数据块,元素的个数分别为8、4、1。将3个数据块的和依次存储在b(1)、b(2)、b(3)中。
小明依据上述描述设计了如下VB程序,运行界面如图所示。请回答下列问题:
Const n = 13
Dim a(1 To n) As Integer Dim b(1 To n) As Integer Private Sub Command1_Click()
Dim start As Integer ‘当前未分割数据的第1个元素下标
Dim i As Integer, k As Integer, pb As Integer, left As Integer, m As Integer
'读取n个数据,依次存储到a(1)、a(2)、……a(n)中,并对数组b赋初值为 0,代码略
start = 1: left = n: m = 0
Do While 2 ^ m <= left ‘寻找第1个数据块
①
Loop
m = m - 1
pb = 1
Do While left > 0
For i = start To start + 2 ^ m - 1
②
Next i
List1.AddItem Str(2^m) + " " + Str(b(pb)) pb = pb + 1
‘改错
left = left - 2 ^ m
Do While left < 2 ^ m
m = m - 1
Loop
Loop
End Sub
① ②
设备名称 |
是否在该系统中选用 |
选用理由 |
温度传感器 |
|
|
声音传感器 |
|
|
光线传感器 |
|
|
物联网模块 |
|
需增加的硬件设备:
添加此硬件设备的理由:
s = "abba"
n = Len(s) 's 是待判断的字符串
i = n \ 2: j = i + 1 + n Mod 2
Do While i > 0
Loop
If i = 0 Then Text1.Text= "对称" Else Text1.Text= "不对称"
方框中的代码由以下三部分组成:
①j = j + 1: i = i - 1
②If c1 <> c2 Then Exit Do
③c1 = Mid(s, i, 1): c2 = Mid(s, j, 1)
下列选项中,代码顺序正确的是( )