Pascal/Turbo Pascal - Ayuda con correccion de program en turbo pascal

Buenas noches!.

El asunto es que me mandaron un proyecto de un juego gramatical para el fin del semestre, lo que necesito ahorita es un algoritmo que me separe en sílabas, ya lo tengo casi terminado sin embargo tengo unos errores en ciertas reglas, por ejemplo la palabra hola la separa ho ho, la palabra aeropuerto se traba el programa, y también no logro aplicar las vocales con acentos

también me piden que entregue el programa en turbo pascal, mi programa corre perfectamente en dev pascal, pero me tira un error en la linea que dice (frase:=UPCASE(frase);) me dice que character expression expected.

agradeceria mucho que me ayudaran a solucionar esos errores. gracias de antemano.

frase:=UPCASE(frase);)


Upcase combierte letra minuscula a mayuscula pero de una en una, me esplico:

supongo que frase es un string de longitud x por lo tanto tendriamos que realizar esto.

for i := 1 to length(frase) do
frase[i] := upcase(frase[i]);

con lo cual tendrias toda la frase en mayusculas.
si lo que quieres es solo 1 tendras qre poner:ç

frase[x] := upcase(frase[x]);