Pascal/Turbo Pascal - Comparar dos strings

Salu2 a todos mi pregunta es la siguiente, escribí un programa que mete una serie de caracteres en una pila y después los saca para determinar si es palíndromo o no cuando solicito la entrada de datos lo guardo en la pila y en un string pero mi pregunta es la siguiente ¿Cómo comparo un string con otro string? ya que logro invertir la palabra pero no sé como compararla con la palabra original

Hola Rafa! La manera de comprobar dos strings es bien simple:

Lo único que debes hacer es lo siguiente:

if (strOriginal = strInvertido) then
write( 'Es palíndromo' )
else
write( 'NO es palíndromo' );

Un abrazo! Cualquier duda aquí estamos.