更多"下列程序段的运行结果是______。
Dimt As Single"的相关试题:
[填空题]下列程序段的运行结果是______。
Dimt As Single，S As Single
Dimn As Integer
S=0:t=1
Forn=1 To 5
t=t*n
s=s+1
Nextn
Debug.Print S
[填空题]下列程序段的运行结果是______。
Dim t As Single, s As Single
Dim n As Integer
s=0:t=1
For n=1 To 5
t=t*n
s=s+t
Next n
Debug.Print s
[填空题]下面程序段的运行结果是 【14】 。
Option Base 1
Private Sub swap(a（ ）As InteSer)
For I=1 to 10/2
t=a(i)
a(i)=a(10-1+1)
a(10-1+1)=t
Next1
End Sub
Private Sub Form_Click（ ）
Dim x(10)As Integer
For I=1 to 10
x(i)=I*2
Next1
Swap x（ ）
For1=1 to 10
Print x (i)
Next I
End Sub
[填空题]下面程序段的运行结果是 【15】 。
Option Base 1
Private Sub swap (a（ ） As Integer)
For I=1 to 10/2
t=a (I)
a (I) =a (10-I+l)
a (10-I+1)=t
Next I
End Sub
Private Sub Form Click（ ）
Dim x(10) As Integer
For I=1 to 10
x(I) =1*2
Next I
Swap x （ ）
For I=1 to 10
Print x (I)
Next I
End Sub
[填空题]下面程序段的运行结果是 【15】 。
Option Base 1
Private Sub swap (a（ ） As Integer)
For I=1 to 10/2
t=a (I)
a (I) =a (10-I+l)
a (10-I+1)=t
Next I
End Sub
Private Sub Form Click（ ）
Dim x(10) As Integer
For I=1 to 10
x(I) =1*2
Next I
Swap x （ ）
For I=1 to 10
Print x (I)
Next I
End Sub
[填空题]下面的程序段的，运行结果是______。
int c=6；
void test(x，y)
int*x，y；
{ *x=3*(*x)；y=*x+y；c=y%(*x)；
printf("x=%d，y=%d，c=%d/n"，*x，y，c)；
}
main（ ）
{ int a=1，b=4；
test (&a，b)；
printf("a=%d，b=%d，c=%d/n"，a，b，c)
}
[单项选择]下面程序段，运行后的结果是
Private Sub Command1_Click（ ）
Dim b%(1 To 4) ,i%, t#
For i = 1 To 4
b(i) =i
Next
t =Tof(b（ ） )
Print "t ="; t,
End Sub
Function Tof(a（ ） As Integer)
Dim t#, i%
t=1
For i =2 To UBound(
[填空题]下面程序段的运行结果是______。
Option Base 1
Private Sub swap(a( ) As Integer)
For I = 1 to 10/2
t =a(I)
a(I) = a(10-I+l)
a(10-I+1) = t
Next I
End Sub
Private Sub Form Click( )
Dim x(10) As Integer
For I = 1 to 10
x(I) = I * 2
Next I
Swap x( )
For I=1 to 10
Print x(I)
Next I
End Sub
[填空题]下列程序段的运行结果是______。
Sub sele（ ）
Dimn as Integer
i=21:n=3
DoWhilei＞n
i=i-n
Loop
Printi
End Sub
[填空题]下列程序段的运行结果是______。
Dim num As Integer, a As Integer, b As Integer
a=88：b=24
Do While b ＜＞0
num=a Mod b
a=b
b=num
Print a
Loop
[填空题]以下程序段的运行结果是______。
#include＜stdio.h＞
main（ ）
int x=2，y=1：
switch(x)
case 1:
switch(y)
case 0:printf("x=2，y=1/n")；break；
case 1:printf("y=1/n")；break；
case 2:printf("x=2/n")；
[单项选择]下面程序段，运行后的结果是（ ）。
Private Sub Commandl_Click( )
Dim b%(1 To 4)，i%，t#
For i=1 To 4
b(i)=i
Next i
t=Tof(b( ) )
Print"t="；t，
End Sub
Function Tof(a（ ） As Integer)
Dim t#，i%
t=1
For i=2 To UBound(a)
t=t * a(i)
Next i
Tof=t
End Function
A. RunSQL
B. RunApp
C. Requery
D. Quit
