Menu Close

Empiezan con mayúscula

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

Soluciones

import Data.Char
 
conMayuscula :: String -> Int
conMayuscula = length . filter (isUpper . head) . words

Una solución de “Empiezan con mayúscula

  1. Paco Jácome
    conMayuscula :: String -> Int
    conMayuscula cs = length (filter (isUpper) cs)

Escribe tu solución

Este sitio usa Akismet para reducir el spam. Aprende cómo se procesan los datos de tus comentarios.