请在横线处填写正确的代码输入a，b两个整数，如果a为大数，则进行交换，然后分别输出大数、小数的值。 a＝int（input（"请输入a："）） b＝int（input（"请输入b："）） if ： #如果a为大数 a, b＝b, a print（"大数是"，，"小数是"，）

0 返回首页

1. 请在横线处填写正确的代码

输入a，b两个整数，如果a为大数，则进行交换，然后分别输出大数、小数的值。

a＝int（input（"请输入a："））

b＝int（input（"请输入b："））

if ： #如果a为大数

a, b＝b, a

print（"大数是"，，"小数是"，）

【考点】

常量、变量及变量的赋值; 分支结构语句及程序实现;

【答案】

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

填空题普通

基础巩固

能力提升

变式训练

拓展培优

换一批

1. IF语句的配对语句是

填空题容易

2. 选择结构程序设计的主导思想是从多个分支中选择支

填空题容易

1. 电费计价规则：用电量不超过150千瓦时的部分单价为0.4元/千瓦时，用电量在151千～400千瓦时的部分单价为0.5元/千瓦时，月用电量在401千瓦时及以上部分单价为0.6元/千瓦时。根据用电量计算应交的电费。

n＝int（input（"请输入用电量总计："））

s＝0

if n＜＝150：

s＝*0.4

elif n＜＝400：

s＝（）*0.5＋150*0.4

else：

s＝（n－400）*＋250*0.5＋150*0.4

print（"应交的电费是%.1f" % s）

填空题普通

2. 请在横线处填写正确的代码

输入一个正整数x，判断其奇偶性。

x＝（input（"请输入一个正整数："））

if ：

print（x, "是偶数。"）

：

print（x, "是奇数。"）

填空题普通

3. 根据雨水的PH值判断酸雨情况，其规则为：当PH值小于4.7时为“重度酸雨”，当PH值介于[4.7，5.6]之间时为“轻度酸雨”，当PH值大于5.6时为“非酸雨”。现根据雨水的PH值判断酸雨情况。

PH＝（input（"请输入雨水的PH值："））

if PH＜4.7：

print（"重度酸雨"）

PH＜＝5.6：

print（"轻度酸雨"）

：

print（"非酸雨"）

填空题普通

1. 执行以下程序段,按程序逻辑横线处代码应该填写（）

a=float(input())

b=float(input())

c=float(input())

if b>a:a, b=b, a

if c>a:a, c=c, a

if c>b:b, c=c, b

print("从大到小的顺序是:", _______)

A. c, b, a B. a, b, c C. a, c, b D. b, c, a

单选题普通

2. 下列选项的语句中，不能实现“温度w高于30，输出温度过高，低于10，输出温度过低，10到30之间输出温度正常”功能的是（）

A. if w>30:

y="温度过高" if w<10:

y="温度过低"

else:

y="温度正常" print(y)

B. y="温度正常"

if w>30:

y="温度过高"

elif w<10:

y="温度过低" print(y)

C. if w>30:

y="温度过高" elif w<10:

y="温度过低" else:

y="温度正常"

print(y)

D. if w>30:

y="温度过高" if w<10:

y="温度过低" if 10<=w<=30:

y="温度正常"

print(y)

单选题普通

3. 运行以下Python程序段，若输入5，运行结果是（）。

x＝int（input（"请输入一个正整数"））

if x%2＝＝0：

print（x＋1）

else：

print（x－1）

A. 4 B. 5 C. 6 D. 3

单选题普通

1. （贪心算法）最大整数问题：设有n个随机生成的正整数，将它们连接成一排，组成一个最大的多位整数。其求解思想是：先把整数转换成字符串，然后再比较ab和ba，如果ab≥ba，就把a排在b的前面，反之则把a排在b的后面。例如：n=3时，3个整数13，312，343，连成的最大整数为34331213。

小王同学编写了一个VB程序，功能如下：在列表框List1中随机生成n个1~1000之间的整数，单击“运行”按钮Command1后进行处理，最大整数结果输出在文本框Text1中。当n=5时，程序运行界面如图所示。

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

(1) 要将按钮Command1的高度修改为800，以下赋值语句正确的是（单选，填字母：A .Command1_Height=800/B .Command1.Height=800/C .Height=800）。

(2) 当n=3时，生成3个数：618，681，68，由这三个数组成的最大整数为。

(3) 请在画线处填入合适的代码。

Const n=5

Dim a（1 To 10）As Integer

Private Sub Command1_Click( )

Dim i, j, t As Integer

For i=1 Ton-1

For j=n To i+1 Step-1

If ① Then

t=a（j-1）：a（j-1）=a（j）：a（j）=t

End If

Next j

Next i

For i=1 To n

Text2. Text=Text2. Text+Str（a（i））

Next i

End Sub

Private Sub Form_Load( )

Randomize

For i=1 To n

a（i）= ②

Text1. Text=Text1. Text +Str（a（i））

Next i

End Sub

Function cmp（a As Integer,b As Integer） As Boolean

If Str（a）+Str（b）<Str（b）+Str（a） Then

cmp=True

Else

cmp=False

End If

End Function

以上程序段运行时，为了实现上述功能，画线处应填入的代码分别为：①；②。

综合题困难

2. 编写“加法练习题生成器”程序，实现如下功能：在文本框Text1中输入题数n，单击“生成”按钮Command1，在列表框List1中显示n个两数之和小于100的加法练习题。程序运行界面如图1所示。

图1

(1) 在设计程序界面时，应使用图2所示“控件工具箱”中的（填写相应编号）添加“生成”按钮。

图2

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

Private Sub Command1_Click()

Dim n As Integer, i As Integer, a As Integer, b As Integer

Randomize

n = Val(Text1.Text)

i =

Do While i <= n

a = Int(Rnd * 100)

b = Int(Rnd * 100)

If Then

List1.AddItem "(" + Str(i) + ")" + Str(a) + "+" + Str(b) + "="

i = i + 1

End If

Loop

End Sub

(3) 运行该程序，在文本框中输入5，单击“生成”按钮后，对语句a = Int(Rnd * 100)执行次数的描述，最合理的是（单选，填字母：A . 执行次数等于5 / B . 执行次数大于等于5 / C .执行次数小于等于5）

综合题普通

3. 疫情发生后，小罗收集了某省南北两区共15个城市的累计病例人数和治愈人数，用以分析统计各区治愈率最高的n个城市。规则如下：每个城市包含区域名、城市名、累计病例人数和治愈人数，以“/”分隔，以“；”结尾。如“北区/A市/1467/530;”,表示北区的A市累计病例人数1467人，治愈人数有530人。

小罗编写VB程序实现上述功能：程序运行时，读取所有城市数据保存在变量shuju中并显示在列表框List1中。在文本框Text1中输入“南区”或“北区”，文本框Text2中输入n的值，单击“排名”按钮Command1，对数据进行统计分析，并在列表框List2中显示治愈率最高的n个城市，如有与第n个城市相同治愈率的城市，则同时输出。程序运行界面如图所示，请回答下列问题。

(1) 代码“List2.AddItem”中的 AddItem是（单选，填字母：A . 事件名/ B . 属性名 / C . 方法名）

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

Dim shuju As String, a(1 To 100) As String

Dim t As Integer, i As Integer, j As Integer, c As String, p As Integer, temp As String, q as String Dim f As Boolean, n As Integer, k As Integer

'读取所有城市数据保存在变量shuju中，并显示在列表框List1中，代码略

t = Len(shuju)

i = 1: p = 0: j = 1

Do While i <= t

c = Mid(shuju, i, 1)

If c = "/" Or c = ";" Then

p = p + 1

a(p) = j = i + 1

End If

i = i + 1

Loop

q = Text1.Text : n = Val(Text2.Text) : i = 1

Do While i <= p \ 4 - 1

k = i

IfThen f = True Else f = False

For j = i + 1 To p \ 4

If a(4 * j - 3) = q Then

If Val(a(4 * j)) / Val(a(4 * j - 1)) > Val(a(4 * k)) / Val(a(4 * k - 1)) Or Not f Then k = j

End If

Next j

If k <> i Then

temp = a(4 * k - 3): a(4 * k - 3) = a(4 * i - 3): a(4 * i - 3) = temp

temp = a(4 * k - 2): a(4 * k - 2) = a(4 * i - 2): a(4 * i - 2) = temp

temp = a(4 * k - 1): a(4 * k - 1) = a(4 * i - 1): a(4 * i - 1) = temp temp = a(4 * k): a(4 * k) = a(4 * i): a(4 * i) = temp

End If

If Then

List2.AddItem a(4*i-3) & "/" & a(4*i-2) & "/" & Format(Val(a(4*i)) / Val(a(4*i-1)), "0.00%") & ";"

i = i + 1

Else

Exit Do

End If

Loop

End Sub

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

综合题困难