La barra es el operador de la división con resultado real, GotoXY acepta parámetros enteros, de allí el error, en vez de usar la barra usa div:
gotoxy(Trunc((80 div 2)-(length(titulo) div 2)),1);

__________________
DriverOp