Uma locadora de charretes cobra R$ 10,00 de taxa para cada 3 horas de uso destas - Lista de Exercícios Resolvidos de VB.NET

Imports System

Module Program
  ' função principal do programa VB.NET
  Sub Main(args As String())
    ' vamos ler a quantidade de horas que a charrete foi usada
    Console.Write("Quantidade de horas que a charrete foi usada: ")
    Dim horas As Integer = Int32.Parse(Console.ReadLine())

    ' vamos calcular o valor por 3 horas exatas
    Dim valor As Integer = horas \ 3

    ' valor a ser pago para cada hora abaixo de 3
    Dim restante As Integer = horas Mod 3

    ' finalmente calculamos o valor total a ser pago