Ejercicio en Ada

[Blade_Stom]

yo recorreria la frase como si fuera un array y en el momento que una letra coincida con la primera letra de RISTRA_VIEJA, llamaria a una funcion COMPROBAR RISTRA, y esta funcion seguira recorriendo el array asta darse cuenta de si ai una secuencia de caracteres que sea igual a RISTRA_VIEJA.En ese caso esa funcion devuelve un true y desde la funcion principal si recibe un true lo que ara sera llamar a otra mini funcion la cual simplemente remplazara la cadena.