[D.M.Nieto]

Hola, me han pedido que haga un programa que lea un entero positivo n y menor que 27 y genere la siguiente matriz cuadrada (n*n).

El programa debe verificar que el número pedido es realmente menor de 27, y en caso contrario volver a solicitarlo.

Ejemplo:

introduzca el tamaño de la matriz: 3

La matriz cuadrada que se genera es:

a b c
b c d
c d e

Yo en cambio sólo he conseguido que me salga una matriz

a a a
b b b
c c c

con el siguiente código:

Código Delphi [-]
uses
  SysUtils;

var

y,x,n: integer;

begin
writeln('Introduzca un numero que simbolice el orden de la matriz');
writeln;
readln(n);
writeln;
 for x:=1 to n do
 begin
  writeln;
  for y:=1 to n do
  begin
  write(chr(96+x));
 end;
  end;
  writeln;
  writeln;
  writeln('Pulse una tecla para finalizar');
  readln;
end.

¿Alguien sabéis como puedo solucionar esto?