15. Prácticas

Práctica 01

Encuentra el último elemento de una lista.

* (my-last '(a b c d))
(D)

Solución

Práctica 02

Encuentra el último y penúltimo elemento de una lista.

* (my-but-last '(a b c d))
(C D)

Solución

Práctica 03

Encuentra un elemento por su posición, siendo el 1 el primer elemento.

* (element-at '(a b c d e) 3)
C

Solución

Práctica 04

Calcula el número de elementos de una lista.

* (my-length '(a b c d e))
5

Solución

Práctica 05

Da la vuelta a una lista.

* (my-reverse '(a b c d e))
(E D C B A)

Solución

Práctica 06

Di si una lista es un palíndromo (se lee igual de izquierda a derecha que de derecha a izquierda).

* (palindromep '(a b c b a))
T

La letra p al final del nombre de la función indica que devuelve un valor booleano (true/false).

Solución

Práctica 07

Aplana una lista. Para ello deberás recorrer cada lista recursivamente sustituyéndola por un elemento.

* (my-flatten '(a (b (c d) e)))
(A B C D E)

Solución

Práctica 08

Eliminar duplicados consecutivos de elementos de la lista. Si una lista contiene elementos repetidos, deben reemplazarse con una sola copia del elemento. No se debe cambiar el orden de los elementos.

* (compress '(a a a a b c c a a d e e e e))
(A B C A D E)

Solución