n=0
Key=int(Rnd*7)+2
L=1: R=8
Do While L<=R
m=(L+R)\2
if Key=a(m) Then
Exit Do
Elseif a(m)<Key Then
L=m+1
n=n+1
Else
R=m-1
n=n-1
Loop
print Str(n)
则程序运行后,输出的结果不可能是( )
n=int(input(“请输入:”))
s = x = 0
while n != 0:
x = n % 10
s = x + s
n = n //10
print(s)
执行该程序段后,依据程序提示,输入“20220412”,则程序输出结果是( )
num2=int(input('请输入第二个正整数:'))
m=max(num1,num2)
n=min(num1,num2)
r= ①
while r!=0:
m= ②
n= ③
r= ①
print('这两个数的最大公约数为:',n)
input("运行完毕,请按回车键退出...")
下列选择错误的是( )
小敏编写了一个VB程序,用来求一个偶数(6到100之间)可能存在多少这样的素数对(注: A+B与B+A认为是相同素数对,不重复统计),并把这些结果输出到一个列表框中,通过逻辑推理,小敏发现这些素数对都是奇数,所以她只需要验证奇数的素数对即可。运行界面如图所示,程序代码如下。但加框处代码有错,请改正。
Dim IsPrime(100) As Boolean '用来存储是否素数,True为素数,False为非素数
Private Sub Command1_Click()
Dim x As Integer, y As Integer, i As Integer, num As Integer
Call Init '调用Init函数
x = Val(Text1.Text)
y = x \ 2
num = 0
For i = 3 To y Step 2
'①
num = num + 1
List1.AddItem Str(x) + "=" + Str(i) + "+" + Str(x - i)
End If
Next i
Label2.Caption = "偶数" + Str(x) + "共有" + Str(num) + "个素数对。"
End Sub
Sub Init() '初始化IsPrime数组的值
Dim i As Integer, j As Integer, x As Integer
For i = 3 To 100 Step 2
x = Int(Sqr(i))
'②
If i Mod j = 0 Then Exit For
Next j
If j > x Then IsPrime(i) = True Else IsPrime(i) = False
Next i
End Sub
① ②
形状,如下图所示:
x=0
while(x!=4): #当x=!4时,执行循环
print('1. 添加订单')
print('2. 发货')
print('3. 查看订单列表')
print('4. 退出')
x=int(input("输入你的选择:")) #输入选择项
if ① :
y=input("输入订单编号:") #输入订单编号
② #在列表listque中添加订单号
elif x==2:
③ #如果订单列表为空
print("订单列表为空")
else:
print("发货单号:"+listque.pop(0))
elif x==3:
print("等待发货:",listque) #查询列表listque中的订单号
print( )
input("运行完毕,请按回车键退出...")
此列表,定义的是( )列表。(从“空、非空” 里选填); 补充划线1/2/3处的内容。