Pascal/Turbo Pascal - alguien sabe como hacer este ejercicio de cadenas?

Filtrado por el usuario: Cristian
<<>>
Filtrado por el usuario 'Cristian' (Eliminar fitro)
 
Vista: