更多"执行下列语句后,程序的输出结果为 【7】 。
x=6: y=2: "的相关试题:
[填空题]执行下列语句后,输出结果是______。
s$="ABCDEFG"
Print InStr(s$,"efg")
Print LCase$(s$)
[填空题]执行以下语句后,输出结果为______。
s$="ABCDEFG"
Print InStr(s$,"efg")
Print LCase$(s$)
[填空题]执行下列语句后,输出结果是______。
s$="ABCDEFG"
Print lnStr(S$, "efg")
Print LCase$(s $)
[填空题]执行以下语句后,输出结果为______。
s$="ABCDEFG"
Print InStr(s$,"efg")
Print LCase$(s$)
[填空题]执行下列语句后,输出结果是______。
s$="ABCDEFG"
Print InStr(s$,"efg")
Print LCase$(s$)
[填空题]设有定义:float x=1234567;,则执行以下语句后的输出结果是______。
printf("%f/n",(int)(x*100+0.5)/100.0);
[填空题]执行下列语句后,输出结果是______。
s$="ABCDEFG"
Print lnStr(s$,"efg")
Print LCase$(s$)
[填空题]执行下列语句后,输出结果为______。
s$="ABCDEFG"
Print InStr(s$,"efS")
Print LCase$(s$)
[填空题]设当前日期为2007年12月27日,星期四,则执行下面语句后的输出结果为______。
Print Day(Now)
Print Month(Now)
Print Year(Now)
Print Weekday(Now)
[填空题]设当前日期为2008年4月28日,星期一,则执行下面语句后的输出结果为______。
Print Day(Now)
Print Month(Now)
Print Year(Now)
Print Weekday(Now)
[填空题]设当前日期为2007年12月27日,星期四,则执行下列语句后的输出结果是______。
Print Day(Now)
Print Month(Now)
Print YeaffNow)
Print Weekday(Now)
[填空题]执行下面程序,第一行输出结果是 ,第二行输出结果是 。
Option Explicit
Private Sub Form_Click( )
Dim A As Integer
A=2
Call Subl(A)
End Sub
Private Subl(x As Integer)
x=x*2+1
If x<10 Then
Call Subl(x)
End If
x=x*2+1
Print x
End Sub
[单项选择]有下列程序段,单击命令按钮执行程序后,输出结果为( )。
Option Base 1
Private Sub Command1_Cliek( )
Dim x
x=Array(23, -5, 17, 38, -31, 46, 11, 8, 5, -4)
s1=0
s2=0
Fork=1 To 10
If (x(k)>0) Then
s1=s1+x(k)
Else
s2=s2+x(k)
End If
Next k
Y=s1/Abs(s2)
Print Y
End Sub
A. 148
B. 40
C. -40
D. 3.7
[单项选择]有下列程序段,单击命令按钮执行程序后,输出结果为( )。
Option Base 1
Private Sub Command1_Click( )
Dim x
x=Array(23,-5,17,38,-31,46,11,8,5,-4)
s1=0
s2=0
For k=1 To 10
If(x(k)>0)Then
s1=s1+x(k)
Else
s2=s2+x(k)
End If
Next k
Y=s1/Abs(s2)
Print Y
End Sub
A. 148
B. 40
C. -40
D. 3.7