Edición de «Parcial de Taller de Álgebra 2015»
De Cuba-Wiki
Puedes deshacer la edición. Antes de deshacer la edición, comprueba la siguiente comparación para verificar que realmente es lo que quieres hacer, y entonces publica los cambios para así efectuar la reversión.
Revisión actual | Tu texto | ||
Línea 14: | Línea 14: | ||
* '''quitarTodosLos 8 [8,5,3,9,8,2,8,7]''' devuelve '''[5,3,9,2,7]''' | * '''quitarTodosLos 8 [8,5,3,9,8,2,8,7]''' devuelve '''[5,3,9,2,7]''' | ||
==Ejercicio 4== | ==Ejercicio 4== | ||
Programe la función '''comprimir :: [Integer] -> [(Integer,Integer)] ''' que devuelva una lista que contenga una tupla (elemento, cantVeces) por cada tira de elementos iguales adyacentes. Por ejemplo: | Programe la función '''comprimir :: [Integer] -> [Integer] -> [(Integer,Integer)] ''' que devuelva una lista que contenga una tupla (elemento, cantVeces) por cada tira de elementos iguales adyacentes. Por ejemplo: | ||
*'''comprimir [7,7,4,4,4,4,4,3,3,3]''' devuelve '''[(7,2),(4,5),(3,3)] | *'''comprimir [7,7,4,4,4,4,4,3,3,3]''' devuelve '''[(7,2),(4,5),(3,3)] | ||
Sugerencia: empiece reemplazando cada elemento ''e'' por una tupla ''(e,1)''. | Sugerencia: empiece reemplazando cada elemento ''e'' por una tupla ''(e,1)''. |