跪求pascal高手

来源：百度知道 编辑：UC知道 时间：2024/05/10 09:28:58
1
121
12321
1234321
12321
121
1
for 循环语句 pascal
是
三空格1
二空格121
一空格12321
无空格1234321
一空格12321
二空格121
三空格1

for i:=1 to n do
begin
for j:=1 to i do write(j);
for j:=i-1 downto 1 do write(j);
writeln;
end;
for i:=n-1 downto 1 do
begin
for j:=1 to i do write(j);
for j:=i-1 downto 1 do write(j);
writeln;
end;

？？？？？什么来的啊啊啊

1楼的肯定错了
这应该是
4行以后倒着输
我看见过着题