小明编写Python程序对本校跳高测试成绩进行排序，规则如下：按照性别分别对成绩进行降序排序并输出名次（女生排前，男生排后，同分同名次）,计算结果如图所示

0 返回首页

1. 小明编写Python程序对本校跳高测试成绩进行排序，规则如下：按照性别分别对成绩进行降序排序并输出名次（女生排前，男生排后，同分同名次）,计算结果如图所示

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

#把文件中的原始数据导入到数组a中，其中a[0][0]存储姓名，a[0][1]存储跳高成绩，a[0][2]存储性别，a[1][0]到a[1][2]存储第一位学生的相关信息，以此类推。代码略

for i in range(1, ① ):

for j in range(1,len(a)-i):

if int(a[j][1])<int(a[j+1][1]) and a[j][2]==a[j+1][2]:

a[j],a[j+1]=a[j+1],a[j]

elif :

a[j],a[j+1]=a[j+1],a[j]

a[1][3]=1

for i in range(2,len(a)):

if a[i][1]!=a[i-1][1]:

a[i][3]=i

else:

②

t=0

for i in range(1,len(a)):

if a[i][2]=="女":

③

else:

a[i][3]=a[i][3]-t

#输出数据a到文件中，代码略

(2) 请在划线处填入合适的代码。

①②③

【考点】

排序算法及程序实现;

【答案】

您现在未登录，无法查看试题答案与解析。登录

综合题困难

1. 分组冒泡排序。分别对数组a的奇数和偶数位置的元素进行冒泡排序，即采用“跳跃式冒泡”的方法，每次跳跃的步长为2，将数组分成2个子序列，分别对这2个子序列进行排序。例如，对数组a=[6,3,5,4,1,2,8,7]进行分组跳跃式升序冒泡排序，排序后的数组a=[1,2,5,3,6,4,8,7]。

(1) 对数组a=[4,5,2,9,6,7,10,3,8,1]进行分组跳跃式升序冒泡排序，则排序后的数组

(2) 实现上述功能的Python程序如下，请在划线处填入合适的代码。

import random

n=8

a=[random.randint(1 ,9) for i in range(n)]

for i in range(0,n,)

forj in range()

if a[j]<a[j-2]:

a[j],a[j-2]=a[j-2],a[j]

(3) 将分组跳跃式冒泡排序推广到每次跳跃的步长为m的情形，例如对数组a=[6,3,5,4,1,2,8,7]进行分组跳跃式升序冒泡排序，当m=3时，排序后的数组a=[4,1 ,26,3,5,6,7]。

相关代码如下，请在划线处填入合适的代码。

import random

m=int(input(“请输入步长m:”))

n=8

a=[random.randint(1,9) for i in range(n)]

print(“排序前”,a)

for i in range()

for j in range()

if a[j]<a[j-m]:

a[j],a[j-m]=a[j-m],a[j]

综合题困难

2. 火车调度台是实现火车车厢整理的平台，当相邻2节车厢序号不符合整理要求时，可以对调2节车厢，实现序号顺序调整。相邻2个进行符合目标的交换，和我们学习的冒泡排序思想一致，所以这个调度过程可以用冒泡排序实现。为了提高效率，对冒泡排序做了优化，请完善下列代码：

nums = [3, 1, 2, 4, 5, 6]

k = n - 1

for i in range(n - 1):

for j in range(k):

if (nums[j] > nums[j + 1]):

nums[j], nums[j + 1] = nums[j + 1], nums[j]

ex_flag = True

if (ex_flag):

break

print(nums)

综合题普通

3. 图图基于排序算法设计了一个数字矩阵排序的VB程序，功能如下：在文本框Text1中输入矩阵的大小n，单击“生成”按钮Command1，在左侧列表框List1中显示行数和列数均为n的随机整数矩阵。单击“排序”按钮Command2，奇数行从左到右升序排序，偶数行从左到右降序排序，结果显示在列表框List2中，输出时保持矩阵大小不变。运行结果如图所示。

请回答下列问题：

(1) 实现上述功能的 VB 程序如下，请在划线处填入合适的代码。

Dim a(1 To 100) As Integer

Dim n As Integer

Private Sub Command1_Click()

Dim i As Integer, j As Integer

Dim s As String, k As Integer

n = Val(Text1.Text)

For i = 1 To n

For j = 1 To n

k = (i - 1) * n + j

a(k) = Int(Rnd() * 45 + 5) * 2

s = s + " " + Str(a(k))

Next j

List1.AddItem s

Next i

End Sub

Private Sub Command2_Click()

Dim i As Integer, L As Integer, R As Integer

Dim f As Integer

For i = 1 To n

If i Mod 2 = 1 Then f = 1 Else f = -1

R = i * n

List2.AddItem sort(L, R, f)

Next i

End Sub

Function sort(left As Integer, right As Integer, order As Integer) As String

Dim i As Integer, j As Integer, k As Integer

Dim s As String, t As Integer

s = ""

For i = left To right - 1

k = i

For j = i + 1 To right

If Then k = j

Next j

If k <> i Then

t = a(k): a(k) = a(i): a(i) = t

End If

s = s + " " + Str(a(i))

Next i

sort = s

End Function

(2) 若删除上述VB程序中加框处代码，（选填：会/不会）影响程序运行结果。

综合题困难