รบกวนพี่ Moshi อีกสักรอบนะคับ

จากโจทย์
123456789
2345678
  34567
    456
      5

จากที่ผมทำ

Program Benz;
uses    crt;
var    i,j,k,l:integer;
begin
clrscr;
      gotoxy(5,5);write('loop&loop');
k:=1;

for  i:=1 to 5 do
    begin
          gotoxy(10-i,14-i);
          for j:=1 to k  do
          write(j);
          writeln;
          k:=k+2;

          end;
          readln;
end.

รันได้

123456789
1234567
  12345
  123
    1

ซึ่งมันไม่เหมือนกันโจทย์คับ