Ofereço ajuda em Java, C/C++, Python, C#, LISP, AutoLisp, AutoCAD
+55 (062) 98553-6711
Ofereço ajuda em PHP, Python, C#, JavaScript, Laravel, Google Ads e SEO
+55 (062) 98243-1195

Você está aqui: VB.NET ::: Desafios e Lista de Exercícios Resolvidos ::: VB.NET Básico

Valor da diária, valor médio arrecadado com e sem promoção e o lucro ou prejuízo mensal de uma promoção em um hotel - Desafio de Programação Resolvido em VB.NET

Quantidade de visualizações: 520 vezes
Pergunta/Tarefa:

Escreva um programa VB.NET para resolver o seguinte problema:

Um hotel com 42 apartamentos resolveu fazer promoções para os fins de semana fora da alta temporada, isto é, nos meses de abril, maio, junho, agosto, setembro, outubro e novembro. A taxa da promoção é de 22% da diária normal. A ocupação média do hotel sem promoção é de 40%. A expectativa é aumentar a taxa de ocupação para 70%. Supondo que as expectativas se confirmem, escrever um algoritmo que lê a diária normal, que calcule e escreva as seguintes informações:

(a) O valor da diária no período da promoção.
(b) O valor médio arrecadado sem a promoção, durante um mês.
(c) O valor médio arrecadado com a promoção, durante um mês.
(d) O lucro ou prejuízo mensal com a promoção.

Seu código VB.NET deverá apresentar uma saída parecida com:

Informe o valor da diária normal: 120
Diária no período de promoção: 26,40
Média arrecadada sem a promoção durante um mês: 8064,00
Média arrecadada com a promoção durante um mês: 3104,64
Prejuízo mensal com a promoção: 4959,36
Resposta/Solução:

Veja a resolução comentada deste exercício usando VB.NET:

----------------------------------------------------------------------
Precisa de ajuda? Chama no WhatsApp +55 (62) 98553-6711 (Osmar)

Este código foi útil? Paga um cafezinho pra mim :-(
PIX: osmar@arquivodecodigos.com.br 
----------------------------------------------------------------------

Imports System

Module Program
  ' função principal do programa VB.NET
  Sub Main(args As String())
    ' valor da diária em período normal  
    Dim valor_diaria_normal As Double
    ' valor da diária no período de promoção
    Dim valor_diaria_promocao As Double

    ' vamos obter o valor da diária no período normal
    Console.Write("Informe o valor da diária normal: ")
    valor_diaria_normal = Double.Parse(Console.ReadLine())

    ' vamos obter o valor da diária no período promocional
    valor_diaria_promocao = valor_diaria_normal * (22.0 / 100.0)

    ' vamos calcular o valor médio arrecadado sem a promoção, durante um mês
    ' estamos assumindo 4 finais de semana por mês
    Dim media_arrecado_sem_promocao As Double = (valor_diaria_normal _
      * (42 * (40.0 / 100.0)) * 4)

    ' vamos calcular o valor médio arrecadado com a promoção, durante um mês
    ' estamos assumindo 4 finais de semana por mês
    Dim media_arrecado_com_promocao As Double = (valor_diaria_promocao _
      * (42 * (70.0 / 100.0)) * 4)

    Console.WriteLine("Diária no período de promoção: " &
      valor_diaria_promocao)
    Console.WriteLine("Média arrecadada sem a promoção durante um mês: " &
      media_arrecado_sem_promocao)
    Console.WriteLine("Média arrecadada com a promoção durante um mês: " &
      media_arrecado_com_promocao)

    ' houve lucro ou prejuízo?
    If (media_arrecado_sem_promocao < media_arrecado_com_promocao) Then
      Console.WriteLine("Lucro mensal com a promoção: " &
        (media_arrecado_com_promocao - media_arrecado_sem_promocao))
    Else
      Console.WriteLine("Prejuízo mensal com a promoção: " &
        (media_arrecado_sem_promocao - media_arrecado_com_promocao))
    End If

    Console.WriteLine(vbCrLf & "Pressione qualquer tecla para sair...")
    ' pausa o programa
    Console.ReadKey()
  End Sub

End Module


Link para compartilhar na Internet ou com seus amigos:

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

E-Book 350 Exercícios Resolvidos de Java - PDF com 500 páginas
Domine lógica de programação e a linguagem Java com o nosso E-Book 350 Exercícios Exercícios de Java, para você estudar onde e quando quiser.

Este e-book contém exercícios resolvidos abrangendo os tópicos: Java básico, matemática e estatística, programação dinâmica, strings e caracteres, entrada e saída, estruturas condicionais, vetores e matrizes, funções, laços, recursividade, internet, arquivos e diretórios, programação orientada a objetos e muito mais.
Ver Conteúdo do E-book
E-Book 650 Dicas, Truques e Exercícios Resolvidos de Python - PDF com 1.200 páginas
Domine lógica de programação e a linguagem Python com o nosso E-Book 650 Dicas, Truques e Exercícios Exercícios de Python, para você estudar onde e quando quiser.

Este e-book contém dicas, truques e exercícios resolvidos abrangendo os tópicos: Python básico, matemática e estatística, banco de dados, programação dinâmica, strings e caracteres, entrada e saída, estruturas condicionais, vetores e matrizes, funções, laços, recursividade, internet, arquivos e diretórios, programação orientada a objetos e muito mais.
Ver Conteúdo do E-book

Linguagens Mais Populares

1º lugar: Java
2º lugar: Python
3º lugar: C#
4º lugar: PHP
5º lugar: C
6º lugar: Delphi
7º lugar: JavaScript
8º lugar: C++
9º lugar: VB.NET
10º lugar: Ruby



© 2025 Arquivo de Códigos - Todos os direitos reservados
Neste momento há 23 usuários muito felizes estudando em nosso site.