pascal打印数字图形读入一个整数n（n

来源：学生作业帮助网 编辑：作业帮 时间：2024/10/02 16:07:33
pascal打印数字图形读入一个整数n（n
x)+H,NNy9igS7<];}O.z~֥Ov4<ٱ-@{:lqKҨ_`gCueE@ZAN-/BddYgXCRLE)9yy֘riEF!UBcB&qX[aa!J]^Ylli &Ly2qx ٞ,LmCҬk##5/ҳ/.H̳x

pascal打印数字图形读入一个整数n（n
pascal打印数字图形
读入一个整数n（n

pascal打印数字图形读入一个整数n（n
var
  n,i,j:longint;
begin
  readln(n);
  for i:=1 to n do
    begin
      for j:=1 to i-1 do write('':5);
      for j:=i to n do write(j-i+1:5);
      writeln;
    end;
end.