下列程序段的执行结果为( )。 a=5 For k=1 To 0 a=a * k Next k Print k；a
A: 2 2
B: 4 3
C: 4 2
D: 3 2
A: 2 2
B: 4 3
C: 4 2
D: 3 2
C
举一反三
- 设执行以下程序段时依次输入1、3、5，执行结果为 。 Dim a(4) As Integer, b(4) As Integer For k = 0 To 2 a(k + 1) = Val(InputBox("请输入数据:")) 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,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
- 设执行以下程序段时依次输入11、33、55,执行结果为 Dim a(4) As Integer, b(4) As Integer For K = 0 To 2 a(K + 1) = Val(InputBox("请输入数据")) b(3 - K) = a(K + 1) Next K Print b(K)
- 若执行以下程序段时依次输入3，4，5，则执行结果为 ________。 Dim a(4) As Integer, b(4) As Integer For k = 0 To 2 a(k + 1) =Val(InputBox(" 请输入数据 ：")) b(3 - k) = a(k+ 1) Next k Print b(k)
- 有如下程序段 Dim a(4) As Integer,b(4) As Integer For k=0 to 2 a(k+1)=k*2 b(3-k)=a(k-1) Next k Print b(k) 执行程序段的结果是
内容
- 0
设执行以下程序段时依次输入1、3、5，执行结果为______。 Dim a(4) As Integer Dim b(4) As Integer For K =0 To 2 a(K+1) =Val(InputBox("请输入数据：")) b(3-K) = a(K+1) Next K Debug. Print b(K) A: 1 B: 3 C: 5 D: 0
- 1
设执行以下程序段时依次输入1、3、5，执行结果为_____。 Dim a(4) As Integer Dim b(4) As Integer For K =0 To 2 a(K+1) =Val(InputBox(“请输入数据")) b(3-K) =a(K+1) Next K Print b(K)
- 2
下列程序输出结果是______。 k=0 while k<=3: k=k+2 print(k) A: 0 B: 2 C: 3 D: 4
- 3
下列程序的执行结果是______。 k =0 For i=1 To 3 a = i ^ i ^ k Print a； Next I A: 1 1 1 B: 1 2 3 C: 0 0 0 D: 1 4 9
- 4
设执行以下程序段时依次输入：1、3、5，执行结果为 Dim a(4)As Integer Dim b(4)As Integer For K＝0 to 2 a(K＋1)＝Val(InputBox("请输入数据：")) b(3－K)＝a(K＋1) Next K Debug．Print b(K) A: 1 B: 3 C: 5 D: 0