Pascal/Turbo Pascal - ayuda para hacer un programa URGENTE

Por favor nesecito ayuda ya intente hacerlo kon todo lo ke se pero no puedo, se trata sobre pascal apenas estoy aprendiendo..el problema se trata de lo siguiente:

-Un programa que almacene en un arreglo 10 nombres(sin apellido), y en base a la primera letra de las palabras que las ordene alfabeticamente y las muestre en pantalla.

se los agradeceria muchisimo si me mandaran la sintaxis a mi mail [email protected]

estare agradecido de por vida, y pueden contar conmigo para lo ke sea..

Solo carga la información en el arreglo y despues utiliza un método de ordenamiento.

For i:=1 to Maximo do
begin
writeln('Teclea un nombre');
readln(arreglo[i]);
end

y para ordenar

For i:=1 to Maximo-1 do
For j:=i+1 to MAximo do
if Arreglo[i]>Arreglo[j] then intercambia


Suerte : )