As maçãs custam R$ 0,30 cada se forem compradas menos do que uma dúzia, e R$ 0,25 se forem compradas pelo menos doze - Desafio de Programação Resolvido em VB.NET

Quantidade de maçãs compradas: 8
O valor da compra é: R$ 2.4

Quantidade de maçãs compradas: 20
O valor da compra é: R$ 5

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 quant_macas As Integer
    Dim valor_total As Double

    ' vamos ler a quantidade de maçãs
    Console.Write("Quantidade de maçãs compradas: ")
    quant_macas = Int32.Parse(Console.ReadLine())

    ' é menos de uma dúzia?
    If quant_macas < 12 Then
......