Pascal/Turbo Pascal - Cuadrado en pascal

Hola.

Tengo un problema con una parte de una practica que no se muy bien como resolverla, a ver si me podeis ayudar:



Un saludo y gracias.

Haces un arreglo bidimensional lo poblas con A
eso es facil 2 bucles anidados para recorrer todas las filas y columnas
inicias con el numero menor=1 y terminas con el numero mayor=5
AAAAA
AAAAA
AAAAA
AAAAA
AAAAA
Despues reemplazas con B de igual forma pero sin incluir los extremos para eso al
mismo bucle le cambias los valores menor =2 y mayor=4
AAAAA
ABBBA
ABBBA
ABBBA
AAAAA
te daras cuenta que para incrementar y decrementar estos 2 bucles deben estar dentro de otro
este se repite el numero de (longitud+1)/2 o redondear longitud/2 Ej. 5+1=6, 6/2= 3; o 5/2=2.5, 2.5 redondeado=3
son tres niveles 1=A, 2=B, 3=C
ahora para saber que letra poner pues ASCII 64=@, 65=A, 66=B, 67=C... 64+nivel te da el codigo ASCII solo lo conviertes en caracter
Ya que tengas tu array con los 3 niveles solo muestras el resultado.
AAAAA
ABBBA
ABCBA
ABBBA
AAAAA