Buenas! Aqui estamos novamente para resolver um exercício do Beecrowd! Fazia algum tempinho que eu não aparecia aqui devido a outros compromissos, mas vamos lá!
Hoje o problema resolvido é o 1017. Esse problema já foi resolvido aqui no blog nas linguagens C e C++, mas agora resolvi ele na linguagem Haskell. Confira nesse post como foi feita essa nova solução!
Aí está!
Plataforma: URI (BEECROWD)
Problema: 1017
Enunciado:
Joaozinho quer calcular e mostrar a quantidade de litros de combustível gastos em uma viagem, ao utilizar um automóvel que faz 12 KM/L. Para isso, ele gostaria que você o auxiliasse através de um simples programa. Para efetuar o cálculo, deve-se fornecer o tempo gasto na viagem (em horas) e a velocidade média durante a mesma (em km/h). Assim, pode-se obter distância percorrida e, em seguida, calcular quantos litros seriam necessários. Mostre o valor com 3 casas decimais após o ponto.
Solução:
Esse problema foi bem simples de resolver. É necessário ler o tempo decorrido (spentTime) e a velocidade média (averageSpeed), ambos como IO Double. Após isso, precisamos calcular a resposta, que deve ser spentTime * averageSpeed / 12.0. No entanto, é necessário formatar a saída, e para isso usa-se printf. printf é usada de forma parecida com a forma da linguagem C, mas sem parênteses. O importante aqui é usar %.3f para utilizar três casas decimais. E aí, achou fácil também esse exercício?
import Text.Printf (printf)
main :: IO () main = do spentTime <- readLn :: IO Double averageSpeed <- readLn :: IO Double printf "%.3f\n" (spentTime * averageSpeed / 12.0)
