更多"下列程序段的执行的结果是 Dim a(10),b(10) i=3 "的相关试题:
[单项选择]下面程序段执行的结果是
Dim i As Integer,S As Integer
S=0
For i=1 to 10 step 1
S=S+i
Next i
A. S=0
B. S=10
C. 死循环
D. S=55
[单项选择]下列程序段执行后,执行的结果是______ 。
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
[单项选择]下列程序段的执行的结果是 Dim a(10),b(10) i=3 For j=1 To 5 a(j) =j b(i) =2 * i + j Next j Print b(i);a(i)
A. 11 3
B. 3 15
C. 3 11
D. 15 3
[单项选择]下列程序段的执行的结果是( )。
Dim a(10),b(10)
i=3
For j=1 To 5
a(j) =j
b(i) =2 * i + j
Next j
Print b(i);a(i)
A. 11 3
B. 3 15
C. 3 11
D. 15 3
[单项选择]执行下列程序段时,分别在输入框中输入2、4、6,则执行结果是______。
Dim A(4) As Integer
Dim B(4) As Integer
For i = 0 To 2
A(i + 1) = Val (InputBox (“请输入数据”))
B(3 - i) = A(i + 1)
Next i
Print B(i)
A. 2
B. 4
C. 6
D. 8
[单项选择]程序段如下: Dim i As Integer,s As Integer For i=4 To 1 Step-1 s=s+i Next i Print s,i执行的结果是( )。
A. 10 0
B. 9 1
C. 10 1
D. 9 0
[单项选择]下列程序段的运行结果是( )。 Sub sele( ) Dim n As Integer i=21:n=3 Do While i>n i=i-n Loop Print i End Sub
A. 2
B. 4
C. 5
D. 3
[单项选择]有如下程序段:
Dim str As String * 10
Dim i
Str1=“abcdefg”
i=12
len1=Len(i)
str2=Right(str1,4)
执行后,len1和str2的返回值分别是( )。
A. 按要求显示部分查询记录
B. 消除重复出现的查询记录
C. 删除查询结果中符合条件的记录
D. 对查询结果进行排序