单项选择题

运行下述语句后，输出的结果是( )。
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