declare
type my_array is TABLE OF NUMBER index by binary_integer; // 定义一个一number维数组类型
num_arr my_array; // 定义数组
num my_array; //定义数组
begin
dbms_output.put_line(1); //第一行直接输出1
num(0) := 1;
for i in 1 .. 9 loop
dbms_output.put(num(0));
for j in 1 .. i - 1 loop
num_arr(j) := (num(j - 1) + num(j));
dbms_output.put(' ' || num_arr(j));
end loop;
dbms_output.put_line(' ' || num(i - 1));
num_arr(i) := num(i - 1);
for j in 1 .. i loop
num(j) := num_arr(j);
end loop;
end loop;
end;