试题 试卷
题型：单选题 题类： 难易度：容易
福建省仙游县第二中学2022-2023学年高一下学期信息技术期中质量检测试卷
i=0
while i<6:
print
i=i+1
Dim a,b,c As Integer
Dim s AS string
a=9
b=41
c=2*(a+b)
s=str(b+c)
图1
图2
PRIVATE SUB FORM__CLICK( )
S=0
FOR A = 1 TO 5
FOR B= 1 TO 3
S=S+1
NEXT B
NEXT A
PRINT S
END SUB
s = "2019appreciate": sum = 0
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch >= "a" And ch <= "z" Then
m = Asc(ch) - Asc("a") + 1
a(m) = a(m) + 1
End If
Next i
For i = 1 To 10
If a(i) > 0 Then sum = sum + 1
数组a各元素的初始值都为0，执行该程序段后，变量sum的值为（ ）
For i=1 To 14
x=2*i-1
If x Mod 3 =0 Then s=s+1
a=[30,10,20,11,12,50]
d=[0]*6 ; max=0 ; n=len(a)
for i in range(1,n):
for j in range(i):
if a[j]<a[i]:
d[i]+=1
if d[i]>max:
max=d[i]
执行程序后，变量max的值是( )
试题篮
图1
图2