Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- main = putStrLn(show(takeWhile even [2, 4, 5, 6]))
- -- Função que calcula o quadrado de um número inteiro x
- quadrado :: Int -> Int
- quadrado x = x * x
- -- Função que calcula a soma de dois números de ponto flutuante 'a' e 'b'
- soma :: Float -> Float -> Float
- soma a b = a + b
- -- Funcão recursiva que utiliza listas de inteiros para calcular o somatório de seus elementos
- somatorio :: [Int] -> Int
- somatorio [] = 0 -- Caso base
- somatorio (a:x) = a + somatorio x -- Caso indutivo
- -- Função recursiva que utiliza listas de inteiros para calcular o dobro de cada um dos seus elementos e retorna uma lista com os resultados
- dobrarLista :: [Int] -> [Int]
- dobrarLista [] = [] -- Caso base
- dobrarLista (a:x) = 2 * a : dobrarLista x -- Caso indutivo
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement