更多"下列程序段运行结果是______。 Dim c As Integer"的相关试题:
[填空题]下列程序段的运行结果是______。
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
[填空题]下列程序段运行结果是______。
Dim c As Integer,num As Integer
Num=29483
Do
c=num Mod 10
Print c;
num=num/10
Loop While num<>0
[填空题]下列程序段运行结果是______。
Dim c As Integer, num As Integer
num=29483
Do
c=num Mod 10
Print c:
num=num /10
Loop While num<>0
[填空题]已知如下程序段:
Dim MyInt As Integer
Dim MyLen
MyLen=Len(MyInt)
执行以上程序段后,MyLen为______。
[填空题]下面程序段运行后,变量X的值为 【14】 。
Dim X As Integer
Dim I as Integer
X = 0
For i = 0 to 50 step 10
X=X+i
Print X
[填空题]下面程序段运行后,变量x的值为上 【15】 。
Dim x As Integer
Dim i As Integer
x=O
for i=0 to 50 step 10
X=X+i
next i
[填空题]下列程序段的运行结果是______。
Dimnum As Integer,a As Integer,b As Integer
a=88:b=24
Do
While b<>0
num=a Modb
a=b
b=num
Wend
Printa
Loop
[单项选择]假定有如下的程序段:Dim intVarAs Integer intvar=True Print intVar则输出结果是
A. 0
B. -1
C. True
D. False
[填空题]下列程序段的运行结果是______。
Sub sele( )
Dimn as Integer
i=21:n=3
DoWhilei>n
i=i-n
Loop
Printi
End Sub
[填空题]下列程序段的运行结果是______。
Dimnum As Integer,a As Integer,b As Integer
a=88:b=24
Do
While b<>0
num=a Modb
a=b
b=num
Wend
Printa
Loop
[单项选择]23 有如下程序段,该程序段循环的次数是______。 Dim i As Integer Dim j As Integer Dim k As Integer k=0 For i = 0 To 10 Step 3 For j = 1 To 5 If j > 3 Then k = k + 4: Exit For k=k+1 Print k Next j If i > 8 Then Exit For Next i
A. 9
B. 10
C. 11
D. 12
[单项选择]有下列程序段:
Dim s,I,j as integer
For I=1 to 3
For j=3 To 1 Step -1
s=I*j
Next j
Next I
执行完该程序段后,循环执行次数是()。
A. 3
B. 4
C. 9
D. 10
[单项选择]有下列程序段:
Dim s,I,j as integer
For I=1 to 3
For j=3 To 1 Step-1
S=I*j
Next j
Next I
执行完该程序段后,循环执行次数是______。
A. 3
B. 4
C. 9
D. 10
[单项选择]执行下列程序段后,变量s的值是()。
Dim S As Integer,n As Integer
S=0:n=1
Do While n<100
S=S+N
n=n+1
Loop
A. 5050
B. 4950
C. 3000
D. 4000
[单项选择]
下面程序段的运行结果是()。
INTEGER A(3,3)
DO 10 K=1,3
DO 10 L=1,3
10 A(K,L)=K*10+L
WRITE(*,’(1X,3I3)’)A
END
A. 11 12 13
B. 11 21 31
C. 11 22 33
D. 11 12 13