A loja ELETROMÓVEIS está vendendo os seus produtos no cartão em 5 vezes sem juros. Faça um algoritmo VB.NET que - Desafio de Programação Resolvido em VB.NET

Valor da compra: 1850
Valor das parcelas: 370.0

Imports System

Module Program
  ' função principal do programa VB.NET
  Sub Main(args As String())
    ' vamos pedir o valor da compra
    Console.Write("Valor da compra: ")
    Dim valor_compra As Double = Double.Parse(Console.ReadLine())

    ' agora calculamos o valor das parcelas
    Dim valor_parcelas As Double = valor_compra / 5

    ' e mostramos o resultado
    Console.WriteLine("Valor das parcelas: " & valor_parcelas)

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

End Module