问题
单项选择题
运行下列语句后，输出的结果是( )。
Option Base 1
Dim a
i=1
a=Array(1,-2,9,0,-1,9)
Do
k=a(i)
For m=10 To k Step-2
n=k+m
Next m
Print n+m
i=i+1
Loop While Abs(m+n)＜＞27
A．3 27-8
B．3-8 27
C．-8 27 3
D．-8 3 27
答案
参考答案：B
解析：本程序中，外层循环是Do…Loop While循环，内层循环是for循环。程序执行如下：
①当i=1，k=a(i)=1，for循环执行5次，n=3，m=0；Print n+m→输出3；i=i+1=2。②当i=2，k=a(i)=-2，for循环执行7次，n=-4，m=-4；Print n+m→输出-8；i=i+1=3。③当i=3，k=a(i)=9，for循环执行1次，n=19，m=8；Print n+m→输出27；i=i+1=4；此时条件成立，退出Do循环。