问题
填空题
下面的程序代码执行之后，输出如下结果，请填写空白处将程序补充完整：
Private Sub Command1_Click()
Dim x(3,3)
For i=1 To 3
For j=1 To 3
If______Then x(i,j)=1
If______Then x(i,j)=-1
Next j
Next i
For i=1 To 3
For j=1 To 3
Print x(i,j);
Next j
______
Next i
End Sub
答案
参考答案：i＞=j；i＜j print
解析： 本题考查打印矩阵。观察输出结果，矩阵对角线包括对角线下部为1，对角线上部为-1，因此对角线下部分矩阵的行标小于等于列标，体现在下标上就是i＞=j，上部分矩阵的行标大于列标i＜j。注意每输出矩阵的一行就输出一个回车。