
实现上述功能的VB代码如下,但加框处代码有错,请改正。
Dim a(1 To 8) As Integer
Dim n As Integer
Private Sub Form_Load()
'n=8,排序前数据存储在数组a中,并在列表框Listl中显示
'代码略
End Sub
Private Sub Command1_Click()
Dim flag As Boolean 'flag值为True表示一遍加工中发生过交换
i = 1
flag = True
Do While
'(1)
flag = False
For j = n To i + 1 Step -1
If a(j) < a(j - 1) Then
k = a(j): a(j) = a(j - 1): a(j - 1) = k
flag = True
End If
Next j
i = i + 1
Loop
Label3.Caption = "排序过程的加工遍数为+
" '(2)
For i = 1 To n
List2.AddItem Str(a(i))
Next i
End Sub
⑴ ⑵
| A | B | C | D |
| if (s[16])%2==0: print(“女性”) else: print(“男性”) | If int(s[16])%2==0: print(“女性”) else: print(“男性”) | if int(s[16])//2==0: print(“女性”) else: print(“男性”) | if (s[16])//2==0: print(“女性”) else: print(“男性”) |
① 在桌面上打开“我的电脑”窗口,进入F盘“数学作业”文件夹
② 在“数学作业”文件夹中选中“二次函数001.doc”文档,然后选中编辑菜单中的“复制”命令
③ 在空白处右击鼠标,新建文件夹,给文件夹命名为“二次函数”
④ 打开“二次函数”文件夹,然后选中编辑菜单中的“粘贴”命令
正确的操作顺序是( )。
def chanageInt (number2) :
number2 = number2+1
print ("changeInt: number2=", number2)
#调用
Number1 = 2
chanageInt (number1)
print ("number:", number1)
打印结果哪项是正确的( )。
| Python程序代码 | 流程图 |
| s= 1 for i in range(1, ① ): if i%2!=0: ② print (s) | |
则程序中划线①和②处应填入的是( )