下列程序段的执行结果为 a=5 Fork=1 To 0 a=a + k Next k Print k；aA．-1 6B．-1 16C．1 5D．11 21
下列程序段的执行结果为 a=5 Fork=1 To 0 a=a + k Next k Print k；a
A．-1 6
B．-1 16
C．1 5
D．11 21
相关考题：
执行下列程序段后，输出的结果是For k1=0 To 4y=20For k2=0 To 3y=10For k3=0 To 2y=y+10Next k3，k2，k1Print yA．90B．60C．40D．10
有下列程序段，单击命令按钮执行程序后，输出结果为( )。 Option Base 1 Private Sub Command1_Cliek() Dim x x=Array(23, -5, 17, 38, -31, 46, 11, 8, 5, -4) s1=0 s2=0 Fork=1 To 10 If (x(k)＞0) Then s1=s1+x(k) Else s2=s2+x(k) End If Next k Y=s1/Abs(s2) Print Y End SubA．148B．40C．-40D．3.7
执行下列程序段后,输出的结果是For k1=0 To 4y=20For k2=0 To 3y=10For k3=0 To 2y=y + 10Next k3,k2,k1Print yA) 90A．90B．60C．40D．10
执行下列程序段后，输出的结果是 For k1=0 To 4 Y=20 For k2=0 To 3 y=10 For k3=0 To 2 y=y+10 Next k3，k2，k1 Print yA．90B．60C．40D．10
执行如下代码, 则程序的运行结果是________。 a = [1,2,3,4] b = [5,6,7,8] c = dict（zip（a,b)) for k,v in c.items（): if k%2==0: print（k,v)
下面程序段运行后输出结果为______。 Dim x（), k%, m% x = Array（1, 2, 3, 4, 5) For k = 0 To 1 m = x（k): x（k) = x（4 - k): x（4 - k) = m Next k For k = 0 To 4 Print x（k); Next kA．1 2 3 4 5B．5 4 2 3 1C．1 3 2 4 5D．5 4 3 2 1
下面程序段运行后输出结果为______。 Dim x（), k%, m% x = Array（1, 2, 3, 4, 5) For k = 0 To 1 m = x（k): x（k) = x（4 - k): x（4 - k) = m Next k For k = 0 To 4 Print x（k); Next kA．5 4 3 2 1B．5 4 2 3 1C．1 2 3 4 5D．1 3 2 4 5