更多"执行以下程序段 Dim i As Integer,X As Integ"的相关试题:
[单项选择]执行以下程序段
Dim x As Integer,i As Integer
x=0
For i=20 To 1 Step-2 x=x+i/5
Next i
后,x的值为
A. 16 D,17
B. 18
C. 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
[单项选择]执行以下程序段
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 a As Integer,b As Integer For a=4 To 1 Step-1 b=b+a Next a Print b, a
A. 100
B. 9 1
C. 10 1
D. 90
[单项选择]执行以下程序段后,x的值为( )。 Dim x As Integer,i As Integer x=0 For i=20 To 0 Step -2 x=x+i/5 Next i
A. 16
B. 17
C. 18
D. 19
[单项选择]下列程序段的执行结果为______。 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 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
[单项选择]设执行以下程序段时依次输入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. 2
B. 4
C. 6
D. 0
[单项选择]下面程序段执行的结果是
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
[单项选择]设执行以下程序段时依次输入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