import math
a=float(input("请输入方程系数a:"))
b=float(input("请输入方程系数b:"))
c=float(input("请输入方程系数c:"))
d=b*b-4*a*c
if :
x1=(-b+math.sqrt(d))/(2*a)
x2=(-b-math.sqrt(d))/(2*a)
print("方程有两个不同的解",x1,x2)
elif :
x1=-b/(2*a)
print("方程有两个相同的解",x1)
else:
print("方程无解")
import pandas as pd
df1=pd. DataFrame([[10, 20], [30, 40]], columns=['A','B'])
df2=pd. DataFrame([50, 60], [70, 80]], columns=['A',B'])
df=df1. append(df2,ignore_ index= True)
print(df)
该程序段运行后输出结果为( )
B .
D .
s1 = Text1.Text
s2 = ""
For i = 1 To Len(s1)
c = Mid(s1, i, 1)
If c >= "0" And c <= "9" Then
c = Chr((Asc(c) - Asc("0") + 1) Mod 10 + Asc("0"))
s2 = s2 + c
ElseIf c >= "A" And c <= "Z" Then
c = Chr(Asc(c) + 32)
s2 = c + s2
End If
Next i
Text2.Text = s2
执行该程序段,在文本框Text1中输入“GoLand,19”,则文本框Text2中显示的内容为( )
Private Sub Cmd1_Click()
Dim s As String, s1 As String, t As Integer, i As Integer
Dim k As Integer, bh As Integer, w As Integer
Dim w1 As Integer, w2 As Integer
s = Text1.Text: k = 1: t = 0: bh = 0 'bh存储当前垃圾的垃圾编号
w1 = 0: w2 = 0
For i = 1 To Len(s) s1 = Mid(s, i, 1)
If Then
t = t * 10 + Val(s1)
Else
If Then
bh = t
Else
If bh = 1 Then
w1 = w1 + t
Else
w2 = w2 + t
End If
End If
k = k + 1
End If
Next i
List1.AddItem "干垃圾共" + Str(w1) + "斤"
List1.AddItem "湿垃圾共" + Str(w2) + "斤"
Label3.Caption = "总重量共有" + Str(w) + "斤"
End Sub
n= ①
Do while ②
tmp=n mod 2
③
④
Loop[
Label1.Caption=s
则为实现上述功能,正确的代码顺序应该是( )
B .
C .
D .
dim X AS double
X=inputbox(“x=”)
if X<0 then
X=-X
endif
print X
在寻找等价货币系统时,小美发现了如下规律:
1)与给定货币系统等价的货币系统必定是该货币系统的子集;
2)如果货币系统中的某个面额可以被其他货币表示时,该面额是无效的;
为此,小美按照如下方法构造最小等价货币系统B:先将原货币系统A的所有面额升序排序,每次把A中可以被B中的货币表示的面额删去后,将A中的最小面额放入B中。以此类推。基于此方法,小美编写了如下程序,在文本框Text1中输入给定的货币系统,单击按钮Command1后,在标签Label1中输出与其等价的货币系统的最小面额种数,在标签Label2中输出该货币系统。程序运行界面如图所示。
Private Sub Command1_Click()
Dim s As String, tmp As String, c As String
Dim n As Integer, i As Integer, j As Integer, ans As Integer
Dim a(1 To 100) As Integer, b(1 To 10000) As Boolean
'数组b(i)用于表示值i能否用已经放入新货币系统中的面额来表示
'此段程序用于将给定货币系统存储在a数组中并将其元素个数存储在变量n中
s = Text1.Text
tmp = "": n = 0
For i = 1 To Len(s)
c = Mid(s, i, 1)
If c >= "0" And c <= "9" Then
ElseIf tmp <> "" Then
n = n + 1
a(n) = Val(tmp)
tmp = ""
End If
Next i
For i = 1 To n - 1
For j = n To i + 1 Step -1
If Then
t = a(j): a(j) = a(j - 1): a(j - 1) = t
End If
Next j
Next i
ans = 0: s = "{"
For i = 1 To a(n)
b(i) = False
Next i
For i = 1 To n
If Not b(a(i)) Then
ans = ans + 1
If ans <> 1 Then s = s + ","
s = s + CStr(a(i)) 'Cstr函数用于将数值变量转为字符串变量并去除首位空格
For j = a(i) + 1 To a(n)
If b(j - a(i))= True Then b(j) = True
Next j
End If
Next i
s = s + "}"
Label1.Caption = "与之等价的最小货币系统面额种数为" + Str(ans)
Label2.Caption = "其为" + s
End Sub
s = "PYTHON"
t = "8421"
result = ""
For i = 1 To Len(t)
x = Val(Mid(t, i, 1))
y = (x - 1) Mod Len(s) + 1
result = result + Mid(s, y, 1)
Next i
Text1.Text = result
执行上述程序段后,文本框Text1中显示的是
⑴初始时,建立一个空字典,把26 个小写字母加入字典中。26 个小写英文字母编码为 1-26,字母“a”的编码为 1,字母“b”的编码为2,其它字母的编码依次增加。
⑵从字符串第一个位置开始扫描,若遇到空格(空格用“*”表示),则得到一个单词,截取该单词并存入变量中。
⑶若该单词在字典中,则取出该单词在字典中的编码值;否则,依次取出该单词中各字母在字典中的编码值,(编码值之间用一个空格分隔),同时产生该单词的编码(编码为字典中的最大编码值加1),加入字典中。
⑷继续扫描字符串,截取单词,并按照步骤⑶的方法进行处理,直至整个字符串编码完毕。字符串“ab ab”LZW编码过程如图所示。
Dim pos As Integer, a(1 To 100)As String
Private Sub Form_Load()
'将字母“a”至“z”依次存入数组元素a(1)到a(26)
End Sub
Function judge(ss As String) As Integer '判断字典中是否有ss这个单词
Dim i As Integer judge = 0
For i = 27 To pos
If a(i) =Then judge = i
Exit For
End If
Next i
End Function
Private Sub Command1_Click()
Dim s As String, i As Integer, j As Integer, k As Integer, ch As String, word As String, result As String, Dim id As Integer, idletter As Integer
s = Text1.Text pos = 26: i = 1
Do While i <= Len(s)
j = i
Do While Mid(s, j, 1) <> " "
j = j + 1
If j > Len(s) Then Exit Do
Loop
word = Mid(s, i, j - i)
If Len(word) = 1 Then '单个字母的单词
result = result + Str(Asc(word) -Asc("a") + 1)
Else
id = judge(word)
If id = 0 Then '新的单词
For k = 1 To Len(word) '依次处理该单词中的各个字母编码
ch = Mid(word, k, 1)
Next k
pos = pos + 1 '对该单词编码
a(pos) = word
Else '词典中存在该单词
result = result + Str(id) End If
End If
If j < Len(s) Then result = result + " *"
Loop
Text2.Text = result
End Sub
s1 = "00100100" : s2 = "" : flag = True
For i = Len(s1) To 1 Step -1
ch = Val(Mid(s1, i, 1))
If flag Then
s2 = Str(ch) + s2
If ch = 1 Then flag = False
Else
s2 = Str(1 - ch) + s2
End If
Next i
Label1.Caption = s2
执行该程序段后,标签Label1中显示的内容是( )
实现功能:从键盘输入10个学生的测试成绩,输出最高分和最低分。
cj=[]
for i in range(0,):
x=float(input("请输入一个数"))
cj.append()
print(max(cj), min())
input("运行完毕,请按回车键退出...")
For i = 1 To 5
a(i)= Int(Rnd * 10)
Next i
For i = 2 To 5
If a(i) < a(i -1) And a(i) Mod 2 = 1 Then
a(i) = a(i) + 1
ElseIf a(i) Mod 2 = 0 And i Mod 2 = 0 Then
a(i) = a(i -1) -1
End If
Next i
执行程序后,a数组各元素不可能是( )
Private Sub Command1_ Click()
Dims As String, c As String, i As Integer
Dim sum As Single, sum1 As Single, sum2 As Single, k As Integer,j As Integer
s = Text1.Text : sum2=0:k= 1
For i= 1 To Len(s)
c=
If c= "*" Or c= "/" Then
If c="*" Then
sum = Val(Mid(s,i+ 1, 1)) * Val(Mid(s,i- I, 1))
Else
sum = Val(Mid(s, i- 1, 1))/ Val(Mid(s,i+ 1,1))
End If
j=i-2
Do While
c = Mid(s,j, 1)
If c="+" Then sum1 = Val(Mid(s,j-1, 1)) + sum
If c="-" Then sum1 = Val(Mid(s,j- 1, 1)) - sum
sum=sum1
j=j- 1
Loop
If k=1 Then
sum2 = sum2 + sum
Else
c= Mid(s, k, 1)
If c =“+" Then sum2 = sum2 + sum
If c="" Then sum2 = sum2 - sum
End If
k=
End If
sum=0
Next i
Label2.Caption = sum2
End Sub
Dim a(1 To 26)As Integer
s=Text1. Text
For i=1 To Len(s)
①
If c>="A" And c<="Z" Then c=Chr(Asc(c)+32)
②
Next i
For i=1 To 26
If a(i)<> 0 Then Label1.Caption= Label1.Caption+ ③
Next i
Const n = 20
Dim i As Integer
Dim a(1 To n) As String
Private Sub Form_Load()
Randomize
For i = 1 To n
a(i) =
Text1.Text = Text1.Text + " " + a(i)
Next i
End Sub
Private Sub Command1_Click()
Dim k As Integer, count As Integer
Dim b(0 To 7) As Integer
k = Val(Text2.Text)
For i = 1 To n
Next i
i = 1
Do While i < 7 And b(i) < k
i = i + 1
Loop
Key = i
count = 0
For i = 1 To n
If a(i) = Chr(Key + 64) Then count = count + 1
If count = Then Exit For
Next i
Text3.Text = "第" + Str(k) + "小的字母是:" + Chr(Key + 64) + ";位置是:" + Str(i) End Sub
def f(a,b):
result=a*b
s=a+b
return result
a=int(input("a="))
b=10
s=f(a,b)
print(s)
import random
dict={"北京市":"北京","上海市":"上海","河北省":"石家庄",… #dict中存储中国34个省级行政区及其省会城市
sf=list( ⑴ )
sh=list( ⑵ )
sj=random.randint(0,33) #生成[0,33]之间的整数
zd=sh[sj]
del sh[sj] #删除列表 sh 中的第 sj项
xx=random.sample(sh,3)+[zd] #随机产生列表 sh 中的 3 项,与 zd 连接成新列表xx #对列表xx 中的内容进行随机排序
random.shuffle(xx)
print("%s 的省会城市是? "%( ⑶ ))
for i in range(4):
print(‘%s.%s’%(‘ABCD’ [i],xx[i]))
print(‘本题参考答案为: %s’%(‘ABCD’[ ⑷ ]))
上述程序段中方框处可选语句为:
①dict.values()
②dict.keys()
③sh[sj]
④sf[sj]
⑤xx.index(zd)
⑥xx[zd]
则( 1 )( 2 )( 3 )( 4 )处语句依次可为( )