ejercicios pseint, primera y ultima letra iguales con subcadena.

ACA LES DEJO RESUELTO EL PROGRAMA HECHO EN PSEINT PARA EL SIGUIENTE PROBLEMA:




Continuando el ejercicio anterior, ahora se pedirá una frase o palabra y se validara si la
primera letra de la frase es igual a la ultima letra de la frase. Se deberá de imprimir un
mensaje por pantalla que diga "CORRECTO", en caso contrario, se deberá imprimir
"INCORRECTO".



Algoritmo sin_titulo
   Definir palabra, letra1 , letra2 como caracter
   


   Escribir " Porfavor ingrese una palabra " ;

   Leer palabra
   letra1 <- Subcadena( palabra,0,0 )
   letra2 <- subcadena( palabra,Longitud(palabra)-1,Longitud(palabra)-1  )
   
   Si letra1=letra2 Entonces
      escribir " verdadero "
   SiNo
      escribir "falso"
   Fin Si
   
FinAlgoritmo