Free pascal的问题。

Question

打出下面这个图。
1 用for循环嵌套
12 for i:=1 to 9 do writeln;
123 begin end;
1234 j:=j+1; end.
......... for j:=1 to j do 上面这段程序怎么改。
123456789 write(j);

Answer 1

感觉略水
for i:=1 to 9 do
Begin
for j: =1 to i do write(j);
writeln;
End;

追问

运行的结果是1121231234......我要的是分行输出出来

追答

for i:=1 to 9 do
Begin
for j: =1 to i do
begin
write(j);
writeln;
end;
End;
最近打C语言，有点不习惯。。。