问题
单项选择题
运行下列语句后，输出的结果是( )。
Option Base 1
Dim a
i=1
a=Array(1,-2,9,0,-1,9)
Do
k=a(i)
For m=10 To k Srep -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；Ptint 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=；Print n+m→输出27；i=i+1=4；此时条件成立，退出Do循环。