Enunciado
-- Ejercicio. Definir, por composición, la función
-- conMayuscula :: String -> Int
-- tal que (conMayuscula cs) es el número de palabras de cs que empiezan
-- con mayúscula. Por ejemplo.
-- conMayuscula "Juan vive en Sevilla o en Huelva" == 3 |
-- Ejercicio. Definir, por composición, la función
-- conMayuscula :: String -> Int
-- tal que (conMayuscula cs) es el número de palabras de cs que empiezan
-- con mayúscula. Por ejemplo.
-- conMayuscula "Juan vive en Sevilla o en Huelva" == 3
Soluciones
import Data.Char
conMayuscula :: String -> Int
conMayuscula = length . filter (isUpper . head) . words |
import Data.Char
conMayuscula :: String -> Int
conMayuscula = length . filter (isUpper . head) . words
Se puede imprimir o compartir con
José A. Alonso
Una solución de “Empiezan con mayúscula”