单项选择题

下列程序段的执行结果为______。
Dim A(3，3)
For M=1 To 3
For N=1 To 3
If N=M 0r N=3-M+1 Then
A(M，N)=1
Else
A(M，N)=0
End If
Next N
Next M
For M=1 To 3
For N=1 To 3
Print A(M， N)；
Next N
Print
Next M