s=0
For k =3 To 1 Step-1
If k <=1 Then x=1
If k <=2 Then x=2
If k <=3 Then x=3
s=s+x
Next k
Text1. Text= Str(s)
该程序段运行后,文本框Text1中显示的内容是( )
Dim s As String, i As Integer, n As Integer
Dim ch As String, ans As Integer
s= Text1.Text
n Len(s): ans=0
For i=1 To n
ch =Mid (s, i, 1)
ans =ans *2+ Val(ch)
Next i
Text2 Text ans
若程序运行后Tex2中显示的是“38”,则Text中输入的是( )
Dim s(1 To 6) As String
Text1.Text = ""
For i= 1 To 5
For j=i+1 To 6
If s(i) + s(j)< s(j) + s(i) Then
t= s(j): s(j)= s(i): s(i)=t
End If
Next j
Next i
For i=1 To 6
Text1.Text = s(i) + Text1.Text
Next i
如果程序运行,一开始当数组元素s(1)到s(6)的值依次为“4","343","312","12","246","121",运行该段代码后,文本框Text1中显示的内容为( )
n = 8
For i = 1 To n
a(i) = Int(Rnd() * 10) + 1 Next i
For i = 1 To n \ 2
If a(i) < a(i + 1) Then p = i: q = i + 1 Else p = i + 1: q = i For j = i + 2 To n - i + 1
If a(j) < a(p) Then q = p: p = j
ElseIf a(j) < a(q) Then q = j
End If Next j
If i <> p Then t = a(p): a(p) = a(i): a(i) = t
If i = q Then q = p
If n - i + 1 <> q Then t = a(q): a(q) = a(n - i + 1): a(n - i + 1) = t
Next i
执行该程序段后,a(1)~a(8)各元素可能的值为( )。
若假定某用户一个月的用电量为x千瓦时,当前单价为p元/千瓦时,则计算标准如下:当x≤50时,电费为p×x元;当50<x≤200时,电费为p×x+(x-50)×0.03元;当x>200时,电费为p×x+4.5+(x-200)×0.1元。
程序设计界面如下图所示,程序的功能是:在文本框Text1中输入用电量x(单位:千瓦时),在文本框Text2中输入电量p(单位:元),单击“计算”按钮(Command1)后,在标签Label4中输出计算结果。
Private Sub Command1_Click()
Dim x As Single, p As Single
Dim s As Single
x =
p =
'此处改错
If x <= 50 Then
s = p * x
s = p * x + (x - 50) * 0.03
Else
s = p * x + 4.5 + (x - 200) * 0.1
End If
Label4.Caption = "本月的电费为:" + + "元"
End Sub
改正:
a=2:b=5
If b>=a Then a=a+2
b=b+2
If b Mod 2=1 Then b=b*a+1
Text1.Text=Str(b)
程序运行后,文本框Text1上显示的内容为。

Private Sub Command1_Click( )
Dim ch As String
Dim n As Integer, x As Integer
Dim ans As String
ch="0123456789ABCDEF"
n= ①
Do While n>0
x=n Mod 16
②
ans= ③
Loop
Label2.Caption="16进制:"+ans
End Sub
画线处应填入的代码为:①;②;③。
某同学参加了学校体检,体检的医生告诉他体重超重,需要加强运动。该同学了解到运动时,心率如能控制在一定范围内,对增强心血管系统和呼吸系统的功能都有很好的效果;超出范围,对身体反而会有损伤。男最适宜运动心率=(220-年龄数-安静心率)×(60%~80%)+安静心率,女最适宜运动心率=(210-年龄数-安静心率)×(60%~80%)+安静心率,补充程序帮他(她)计算最适宜的运动心率。
age=float(input('请输入age='))
HRrest=float(input('请输入HRrest='))
gender=input(“请输入male or female :”)
if :
else:
low=(n-age-HRrest)*0.6+HRrest
high=(n-age-HRrest)*0.8+HRrest
print('最适宜的心率是:',low,'~',high)
input(“运行完毕,请按回车键退出...”)
a=23
b=int(a/10)
a=(a-b*10)*10
b=a+b
print(a,b)
对应的Python表达式是(r1、r2和r3分别对应变量
、
和
)( )
B . r1/(r1+r2)u
C . r1/(r1+r2)·u
D . r1/(r1+r2)*u
n=8
m=float(n)
print(m)
jc =1
for i in range(1,5):
jc *= i
print(jc)
|
m = int(input("请输入一个正整数:")) x = m y = m for i in range (9):n = int(input("请输入一个正整数:")) if n<x : x = n if n<y : y = n print(x, y) 程序运行后,依次输入:12 35 9 11 23 88 13 19 29 55 |
运行结果是:
Private Sub Command1_ Click()
Dim s As String,a As String,b As String
Dim t As Long,sum As Long
s= Text1. Text+".”
t=0: sum= 0
For i=1 To Len(s)- 1
a= Mid(s, i, 1)
b= Mid(s, i+1, 1)
If (a>= "0" Anda<= "9") And (b >= "0" And b <= "9") Then
t=t * 10+ Val(a)
ElseIf (a >= "O" And a <= "9") And(b<= "0" Or b>= "9") Then
t=t *10+Val(a)
sum= sum- t
t=0
End If
Next i
Text2.Text= Str( sum)
End Sub
程序运行时,在文本框Text1中输入“yy2019mm03dd12”,单击按钮Command1后,在文本框Text2中显示的内容为( )
s=0
While s<=30 :
s=s+10
Print(s)
该程序循环的次数是( )。