如题，用array来编写一个树形数据库。得出的数据库如图。
我写的程序运行出来最后一行也是七个1，似乎没有办法再加比前一行少一些数据的。问题在哪里？请高手赐教！
data a(drop=i);
array D[7] D1-D7;
do i=4;
D=1;
end;output;
do i=3 to 5;
D=1;
end;output;
do i=2 to 6;
D=1;
end;output;
do i=1 to 7;
D=1;
end;output;
do i=3 to 5;
D=1;
end;output;
run;
[attachment=225937,1472]
