Question

编程输出对角线元素为0，上三角元素为1，下三角元素为1的5×5方阵如下图。（代码写在form1_c

编程输出对角线元素为0，上三角元素为1，下三角元素为1的5×5方阵如下图。（代码写在form1_click() 事件中）
求助，求助！

Answer 1

思路：先将所有的元素赋1，然后将对角线元素赋0，再将生成的方阵输出。

追问

亲，我要VB代码！

追答

Dim a(5,5) as integer
Dim I,j as integer
For i=1 to 5
For j=1 to 5
A(I,j)=1
Next j
Next I
For i=1 to 5
A(I,I)=0
Next I
For i=1 to 5
For j=1 to 5
Print a(I,j);
Next j
Print
Next I