更多"设执行以下程序段时依次输入2,4,6执行结果为 Dim a(4) "的相关试题:
[单项选择]设执行以下程序段时依次输入2,4,6执行结果为
Dim a(4) As Integer,b(4) As Integer
For k =0 To 2
a(k + 1) = Val(InputBox( "Enter data:" ) )
b(3 - k) =a(k + 1)
Next
Print b(k)
A. 2
B. 4
C. 6
D. 0
[单项选择]设执行以下程序段时依次输入2,4,6,执行结果为( )。
Dim a(4)As Integer
Dim b(4)AS Integer
For k=0 To 2
a(k+1)=Val(InputBox("Enter data:"))
b(3 - k) =a(k + 1)
Next k
Print b(k)
A. 可以随意读取随机文件中任一记录的数据
B. 随机文件没有只读或只写的操作方式,随机文件只要一打开,就既可读又可写
C. 随机文件的操作是以记录为单位进行的
D. 随机文件的读、写操作语句与顺序文件的读写操作语句一样
[单项选择]设执行以下程序段时依次输入1、3、5,执行结果为______ 。 Dim a(4)As Integer Dim b(4) As Integer For K=0 To 2 a(K+1)=Val(1nputBox(“请输入数据:”)) b(3-K)=a(K+1) Next K Print b(K)
A. 1
B. 3
C. 5
D. 0
[单项选择]执行下列程序段时,分别在输入框中输入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
[单项选择]有如下程序段:
Dim str As String * 10
Dim i
Str1=“abcdefg”
i=12
len1=Len(i)
str2=Right(str1,4)
执行后,len1和str2的返回值分别是( )。
A. 12,abcd
B. 10,bcde
C. 2,defg
D. 0,cdef
[单项选择]下列程序段执行后,执行的结果是______ 。
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 1,a(10),p(3)
k=5
For i=0 To 10
a(i)=i
Next i
For i=0 To 2
P(i)=a(i*(i+1))
Next i
For i=0 To 2
k=k+P(i)*2
Next i
Print k
A. 20
B. 21
C. 56
D. 32
[单项选择]执行以下程序段
Dim i As Integer, x As nteger x = 0
For i = 20 To 1 Step -2
Next
x = x + i / 5
Print x
后,x的值为______。
A. 16
B. 17
C. 18
D. 19
[单项选择]执行以下程序段 Dim x As Integer, i As Integer x=0 For i=20 To Step -2 x=x+i/5 Next i 后,x的值为
A. 16
B. 17
C. 18
D. 19