请教:编写程序，打印如下所示的“数字金字塔”

[hxdlc2002]

1
1 2 1
1 2 3 2 1
1 2 3 4 3 2 1
1 2 3 4 5 4 3 2 1
1 2 3 4 5 6 5 4 3 2 1
1 2 3 4 5 6 7 6 5 4 3 2 1
1 2 3 4 5 6 7 8 7 6 5 4 3 2 1
1 2 3 4 5 6 7 8 9 8 7 6 5 4 3 2 1

[zglnew]

for i=1 to 9
for j=1 to i
? j;
next j
for j=i-1 to 1
? j;
next j
?
next i

[zglnew]

For i = 1 To 9
For j = 1 To 9 - i
Print " ";
Next j
For j = 1 To i
Print j;
Next j
For j = i - 1 To 1 Step -1
Print j;
Next j
Print
Next i