Start with haskell.

helloworld.hs

{-main = do
  putStrLn "Qual é o seu primeiro nome?"
  primeiroNome <- getLine

  putStrLn "Qual é o seu segundo nome?"
  segundoNome <- getLine

  putStrLn ("Olá, " ++ primeiroNome ++ " " ++ segundoNome  ++ "!")
-}

import Data.Char

main = do
  linha <- getLine
  -- Maiúscula
  let linhaMaiuscula = map toUpper linha

  if null linha
      then return ()
      else do
        putStrLn $ palavrasInvertidas linhaMaiuscula
        main

palavrasInvertidas = unwords . map reverse . words

{-import Control.Monad

main = do
  c <- getChar

  when (c /= ' ') $ do
    putChar c
    main-}