更多"下列程序执行后，变量S的值为______ 。 Dim s As "的相关试题:
[单项选择]下列程序执行后，变量x的值为( )。
Dim a,b,c,d As Single
Dim x As Single
a=10
b=30
c=400
If b>a Then
d=a:a=b:b=d
End If
If b>c Then
x=b
Else If a>c Then
x=c
Else
x=a
End If
A. 10
B. 30
C. 400
D. 430
[单项选择]下列程序执行后，变量S的值为
Dim s As Long,x As Integer
s=0
For x＝1 To 10 Step 2
s＝s+x
Next x
Text1.Text＝s
A. 10
B. 25
C. 50
D. 100
[单项选择]下列程序执行后，变量a的值为
Dim a，b，C，d as single
a=100：b=20：c=1000
if b＞a Then
d=a:a=b：b=d
End if
if c ＞ a Then
d=b：b=c：c=d
End if
A. 0
B. 1000
C. 20
D. 100
[单项选择]下列程序执行后，变量a的值为( )。
Dim a,b,c,d As Single
a=10:b=20:c=40
If b＞a Then
d=a:a=b:b=d
End If
If c＞a Then
d=a:a=c:c=d
End If
If c＞b Then
d=b:b=c:c=d
End If
A. 10
B. 40
C. 20
D. 100
[单项选择]下列程序段执行后，内存变量y的值是( )。 x=76543 y=0 DO WHILE x＞0 y=x%10+Y*10 X=int(x/10) ENDDO
A. 3456
B. 34567
C. 7654
D. 76543
[单项选择]下列程序段执行后，内存变量s1的值是
s1="network"
s1=stuff(s1，4，4，"BIOS")
s1
A. network
B. netBIOS
C. net
D. BIOS
[单项选择]下列程序段执行后，内存变量s1的值是( )。
s1="network"
s1=stuff(s1，4，4，"BIOS")
s1
A. network
B. netBIOS
C. net
D. BIOS
[单项选择]下列程序段执行后，执行的结果是______ 。
Dim M(10)
Dim N(10)
i=3
For j = 1 To 5
M(j) = j
N(i) = 2 * i + j
Next j
Print N(i); M(i)
A. 12 4
B. 11 3
C. 3 11
D. 10 2
[单项选择]执行下列程序后，变量a的值为 ( )
Dim i As Integer
Dim a As Integer
a=0
For i＝l To 100 Step 2
a=a+l
Next i
A. 1
B. 10
C. 50
D. 100
[单项选择]赋值语句M＝5+3.0φ2/2执行后，整型变量M的值是（）。
A. 9.5
B. 10
C. 9
D. 8
[单项选择]执行下列程序后，变量a的值为( )。
Dim i As Integer
Dim a As Integer
a=0
For i=1 To 100 Step 2
a=a+1
Next i
A. 1
B. 10
C. 50
D. 100
[单项选择]若整型变量a的值为2、b的值为3，则下面程序段执行后整型变量c的值为( )。
If a＞5 Then
If b＜4 Thenc=a-b Elsec=b-a
Else
If b＞3 Thenc=a*b Elsec=aMod6
End If
A. 2
B. -1
C. 1
D. 6
[单项选择]FORTRAN赋值语句M=5+3.0**2/2执行后，整型变量M的值是（）。
A. 9.5
B. 10
C. 9
D. 8
[单项选择]以下程序段执行后整型变量n的值为( )。
n=0
For i=1 to 20 Step 5
n=n+1
Next i
A. 50
B. 4
C. 15
D. 210
[单项选择]若整型变量a值为2、b的值为3，则下列程序段执行后整型变量c的值为______。
If a＞5 then
If b＜4 Then c=a-b Else c=b-a
Else
If b＞3 Then c=a*b Else c=a mod b
End If
A. 2
B. -1
C. 1
D. 6
