Você está aqui: VB.NET ::: Desafios e Lista de Exercícios Resolvidos ::: Estruturas de Controle |
É melhor abastecer com álcool ou gasolina? Escreva um programa VB.NET para ajudar o motorista a se decidir - Desafio de Programação Resolvido em VB.NETQuantidade de visualizações: 515 vezes |
|
Pergunta/Tarefa: Existe a convenção de que o etanol será mais econômico se custar até 70% do preço da gasolina ou sair 30% mais barato, conforme parâmetros do Inmetro. Ela foi determinada a partir da diferença de consumo entre os dois combustíveis: como o álcool bebe 30% mais que a gasolina, seu custo deve ser pelo menos 30% inferior ao da gasolina para ser vantajoso. Para saber o que ficará mais em conta, divida o preço do litro do álcool pelo da gasolina. Se o resultado for menor que 0.7, o recomendável é abastecer com álcool. Caso seja maior, o mais viável é escolher a gasolina. Escreva um programa VB.NET que pede ao usuário o preço do litro de etanol e o preço do litro da gasolina e informe qual dos dois combustíveis é recomendável colocar. Lembre-se: Se o preço do etanol for acima de 70% o recomendável é abastecer com gasolina. Sua saída deve ser parecida com: Informe o valor do litro de etanol: 3.22 Informe o valor do litro de gasolina: 5.46 Compensa colocar etanol Veja a resolução comentada deste exercício usando VB.NET: ----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------
Imports System
Module Program
' função principal do programa VB.NET
Sub Main(args As String())
' variáveis usadas na resolução do problema
Dim preco_etanol, preco_gasolina As Double
' vamos ler o preço do litro de etanol
Console.Write("Informe o valor do litro de etanol: ")
preco_etanol = Double.Parse(Console.ReadLine())
' vamos ler o preço do litro de gasolina
Console.Write("Informe o valor do litro de gasolina: ")
preco_gasolina = Double.Parse(Console.ReadLine())
' compensa colocar gasolina?
If ((preco_etanol / preco_gasolina) > (70 / 100.0)) Then
Console.WriteLine("Compensa colocar gasolina")
' melhor colocar etanol então
Else
Console.WriteLine("Compensa colocar etanol")
End If
Console.WriteLine(vbCrLf & "Pressione qualquer tecla para sair...")
' pausa o programa
Console.ReadKey()
End Sub
End Module
|
|
|
Mais Desafios de Programação e Exercícios e Algoritmos Resolvidos de VB.NET |
Veja mais Dicas e truques de VB.NET |
Dicas e truques de outras linguagens |
E-Books em PDF |
||||
|
||||
|
||||
Linguagens Mais Populares |
||||
|
1º lugar: Java |





