URI (BEECROWD) - 1017 - Fuel Spent (Gasto de Combustível) - Iniciante - Haskell

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)