Даны два предложения. Найти общее количество букв “z”в них. (Определить функцию для расчета количества букв “z”в предложении).

Язык программирования не указан, пишу на Haskell

• countZ :: String -> Int
• countZ = length . filter (`elem` "zZ")

• main :: IO ()
• main = do
• x <- getLine
• putStrLn . countZ <$> x