Um comerciante comprou um produto e quer vendê-lo com um lucro de 45% se o valor da compra for menor - Exercícios Resolvidos de VB.NET

Informe o valor do produto: 85
O valor de venda é: 110.5

Imports System

Module Program
  ' função principal do programa VB.NET
  Sub Main(args As String())
    ' vamos ler o valor do produto
    Console.Write("Informe o valor do produto: ")
    Dim valor As Double = Double.Parse(Console.ReadLine())

    ' vamos calcular o valor de venda
    Dim valorVenda As Double
    If valor < 20 Then
      valorVenda = valor + (valor * (45.0 / 100))
    Else
      valorVenda = valor + (valor * (30.0 / 100))
    End If

    Console.WriteLine("O valor de venda é: " & valorVenda)

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