Private Sub Command1_Click()
Dim sum As Double, x As Double
sum=0
n=0
For i=1 To 5
x=n/i
n=n+1
sum=sum+x
Next i
End Sub
该程序计算了一个表达式的值,这个表达式是( )
For k = 1 To 4 Step 3
For i = k To k + 1
For j = i + 1 To k + 2
If a(j) < a(i) Then
temp = a(j): a(j) = a(i): a(i) = temp
End If
Next j
Next i
Next k
数组元素a(1)到a(6)的值依次为“9,8,7,6,5,4”,经过该程序段“加工”后,数组元素a(1)到a(6)的值依次为( )
下列说法正确的是( )
X=5
For i = 1 TO 20 STEP 2
x=x+i^2
Next i
使用参数“Wave PCM signed 8 bit,22050 Hz,单声道”另存该文件,分析图中信息,另存后的文件存储容量为原来的( )
小雨:1d(或24h)降雨量小于10mm者。
中雨:1d(或24h)降雨量10~25mm者。
大雨:1d(或24h)降雨量25~50mm者。
暴雨:1d(或24h)降雨量50~100mm者。
大暴雨:1d(或24h)降雨量100~250mm者。
特大暴雨:1d(或24h)降雨量在250mm以上者。
Private Sub Command1_Click()
Dim a As Single
Dim s as ①
a = ②
If a > 250 Then
s = "特大暴雨"
ElseIf a > 100 Then
s = "大暴雨"
ElseIf a > 50 Then
s = "暴雨"
ElseIf a > 25 Then
s = "大雨"
ElseIf a > 10 Then
s= "中雨"
ElseIf ③ Then
s = "小雨"
Else
s = "无雨"
End If
Label3.caption= ④
End Sub
a=5
if (a>3) and ((a==4) or (a<6)):
print("Hello")
else:
print("Bye")
运行结果是: (提示:输入宇母时只能输入小写字母)