Pascal/Turbo Pascal - Alguien sabe como hacer este ejercicio de cadena de caracteres?

Filtrado por el usuario: Alfonso
Filtrado por el usuario 'Alfonso' (Eliminar fitro)
 
Vista: