1. (2019高二下·临河期中) 有如下程序：

 Dim a(3, 3) As Integer

 For m = 1 To 3

 For n = 1 To 3

   a(m, n)=(m-1)*3+n

 Next n

 Next m

   For m = 2 To 3

For n = 1 To 2

   Print a(n, m);

Next n

Next m

运行后输出结果是（  ）