题型：综合题 题类： 难易度：困难
浙江省绍兴市2023-2024学年高二上学期信息技术期中考试选考试卷
比如：仓库存储情况列表a=["0","A","A","B","B","A","0","0","0"]，其中"0"表示空位，"A"，"B"表示位置上货物种类，现需从中取出一件B货物，则应从右侧取出，取完后，仓库存储列表更新为a=["0","A","A","B","A","0","0","0","0"]。
#读取仓库存储情况列表a，代码略
m=len(a)
kind=input("请输入需要取出的货物种类：")
left=0 #left记录从左侧取出此货物时需移动其他物品的次数
right=0 #right记录从右侧取出此货物时需移动其他物品的次数
i=0;j=m-1
t=[0,0] #t表示是否找到此货物
while i<=j and t!=[1,1]:
if :
i=i+1
elif a[i]!=kind:
left+=1
i=i+1
else:
t[0]=1
if a[j]=="0":
j=j-1
elif a[j]!=kind:
j=j-1
else:
t[1]=1
if left>right:
for k in range(j,m-1):
a[k]=a[k+1]
a[m-1]="0"
else:
for k in range():
a[k]=a[k-1]
a[0]="0"
print(a)
| Dim s1 As String, s2 As String Dim c As Integer, i As Integer s1 = InputBox("请输入一串字符") s2 = "" c = Len(s1) For i = ▲ s2 = Mid(s1, i, 1) + s2 Next i Print s2 | 【函数功能提示】 ⑴函数Len(x)的功能是：取字符串x的长度值（即字符个数值）。 若x="abc"，则Len(x)的值为3。 ⑵函数Mid(x，y，z)的功能是：在字符串x中第y个字符开始取z个字符。 若x="abcdefg"，则 Mid(x，4，3)取得的值是"def"。 |
程序空白处应填写的语句是：{#blank#}1{#/blank#}。
试题篮
