更多"有下列程序段: Dim s,I,j as integer For "的相关试题:
[填空题]已知如下程序段:
Dim MyInt As Integer
Dim MyLen
MyLen=Len(MyInt)
执行以上程序段后,MyLen为______。
[单项选择]假定有如下的程序段:Dim intVarAs Integer intvar=True Print intVar则输出结果是
A. 0
B. -1
C. True
D. False
[填空题]下面程序段运行后,变量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
[填空题]下面程序段运行后,变量X的值为【16】。
Dim x AS Integer
Dim I AS Integer
x=0
for I=0 to 50 step 10
X=X+I。
next I
Print X
[单项选择]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 m(3,3)As Integer
Dim i As Integer
Dim j As Integer
Dim K As Integer
For i=1 To 3
m(i,i)=i
Next
For i=0 To 3
For j=0 To 3
x=x+m(i,j)
Next
Next
Print x
A. 3
B. 4
C. 5
D. 6
[单项选择]下列程序段的执行结果为______。
Dim m(3,3)As Integer
Dim i As Integer
Dim j As Integer
Dim x As Integer
For i=1 To 3
m(i,i)=i
Next
For i=0 To 3
For j=0 To 3
x=x+m(i,j)
Next
Next
Print x
A. 3
B. 4
C. 5
D. 6
[填空题]下列程序段运行结果是______。
Dim c As Integer,num As Integer
Num=29483
Do
c=num Mod 10
Print c;
num=num/10
Loop While num<>0