Pascal/Turbo Pascal - URGENTE!AYUDA CON PROGRAMA DE PASCAL DE CICLOS REPETITIVOS...

var   //declaramos variables

  n,i,j:Integer;

begin

  Writeln('Ingrese un numero ');//imprimos mensaje por consola

  Readln(n);                    // leemos un numero y  lo guardamos en la variable n

  //El doble for es porque

  // el primer for se encarga de las filas

  // y el segundo for de las columnas

   // imaginate como si fuera una matriz fila x columna

  //ejemplo

  // 1

  // 1 2

  // 1 2 3

  // 1 2 3 4

  for i:=1 to n do

  begin

    for j:=1 to i do

    begin

      Write(j,' ');//imprimimos el numero y dejamos un espacion en blanco a la derecha

    end;

    Writeln///saltamos de linea

  end;

  Readln; //pausamos el programa

end.