Lista de Exercícios: Haskell Avançado (Tipos e IO)¶

Esta página contém exercícios de fixação sobre tipos algébricos de dados (ADTs) e programação interativa (IO) em Haskell.

📕 Lista 4: Tipos Algébricos, Sinônimos e Pattern Matching¶

Crie um sinônimo de tipo Nome para String e Idade para Int.

Escreva uma função apresenta :: Nome -> Idade -> String que retorne "Meu nome é X e tenho Y anos".
Explique a diferença entre type e newtype em Haskell.
Crie um sinônimo de tipo Ponto para (Float, Float).

Escreva uma função distancia :: Ponto -> Ponto -> Float que calcule a distância euclidiana entre dois pontos.

Crie um newtype chamado Dolar que envolve Float.

Escreva uma função converterParaReal :: Dolar -> Float considerando 1 Dólar = 5,50 BRL.
Explique por que newtype é mais eficiente que data para tipos que envolvem um único construtor com um único campo.

Defina um tipo DiaSemana com os sete dias da semana.

Escreva uma função proximoDia :: DiaSemana -> DiaSemana.
Defina um tipo Cor com Vermelho | Verde | Azul | Amarelo.

Crie uma função ehPrimaria :: Cor -> Bool que retorne True se a cor for primária.
Crie um tipo Forma com Circulo Float | Retangulo Float Float | Quadrado Float.

Escreva uma função area :: Forma -> Float que calcule a área de qualquer forma.
Crie um tipo Conta com Corrente Float | Poupanca Float Float (saldo e juros).

Escreva uma função saldoTotal :: Conta -> Float que retorne o saldo total considerando juros na poupança.

Reescreva a função area do exercício 8 usando pattern matching.
Escreva uma função ehFimDeSemana :: DiaSemana -> Bool usando pattern matching.
Crie uma função descricaoConta :: Conta -> String que descreva a conta ("Conta Corrente: R$..." ou "Conta Poupança: R$... com juros...").
Escreva uma função somaPontos :: Ponto -> Ponto -> Ponto usando pattern matching em tuplas.

Crie um tipo Resultado com Sucesso String | Erro String.

Escreva uma função processar :: Bool -> Resultado que retorne Sucesso "OK" se True, ou Erro "Falha" se False.
Crie um tipo Expressao para representar expressões matemáticas simples:

Valor Int | Soma Expressao Expressao | Multiplicacao Expressao Expressao.

Escreva uma função avaliar :: Expressao -> Int que calcule o valor da expressão.
Crie um tipo Opcao com Sim | Nao | Talvez.

Escreva uma função resposta :: Opcao -> String que retorne "Aceito", "Recuso" ou "Indeciso".

Crie um tipo Pessoa com Nome String e Idade Int.

Escreva uma função maiorIdade :: Pessoa -> Bool usando pattern matching.
Crie um tipo Livro com Titulo String | Autor String | Ano Int.

Escreva uma função descricaoLivro :: Livro -> String.
Defina um tipo Arvore a com Folha a | No (Arvore a) (Arvore a).

Escreva uma função contaNos :: Arvore a -> Int que conte os nós de uma árvore.
Escreva uma função mapArvore :: (a -> b) -> Arvore a -> Arvore b que aplique uma função a todos os elementos da árvore.

Escreva um programa que leia um caractere do teclado e o imprima duas vezes na tela.
```
-- exemplo de execução
> a
aa
```
Crie um programa que leia dois caracteres e os imprima separados por um espaço.
```
> a
> b
a b
```
Escreva uma versão simplificada do putStrLn, chamada putStrSimples, que recebe uma string e a imprime caractere por caractere, finalizando com \n.

Implemente uma função que peça o nome do usuário e o cumprimente.
```
> Qual eh o seu nome?
Sergio
Bem vindo Sergio!
```
Escreva um programa que leia duas linhas do teclado e depois imprima a concatenação delas.

Reescreva o seguinte programa sem usar do (usando >>=):

main = do
  nome <- getLine
  putStrLn ("Oi, " ++ nome)

Escreva um programa que peça a idade do usuário e diga se ele é maior de idade ou não.

Escreva um programa que leia o conteúdo de um arquivo "entrada.txt" e imprima na tela.
Crie uma função que copie o conteúdo de "entrada.txt" para "saida.txt".
Adapte o programa de remoção de stopwords (do exemplo) para que o nome dos arquivos de entrada e saída seja pedido ao usuário via teclado.

Implemente um programa que conte quantas linhas existem em um arquivo de texto.
Escreva uma função main que:
- pergunte ao usuário um número n,
- leia uma lista de números de um arquivo,
- some apenas os n primeiros números,
- grave o resultado em outro arquivo.
Escreva um mini “chat”: o programa deve ler uma linha do usuário e imprimir de volta a mesma linha em maiúsculas até que ele digite "sair".