Imports System

Public Module Module1

    Public Sub Main()

        dim t1 as integer

        dim t2 as integer

        dim t3 as integer

        t1 = 5

        t2 = 10

        t3 = 20

        dim bateria as decimal

        bateria = (t1 + t2 + t3) / 3

        Console.WriteLine(bateria)

        if (bateria >= 70)

            Console.WriteLine("optimo")

        elseif (70)

            Console.WriteLine("precaucion")

        else 

            Console.WriteLine("cargar")

        end if

    End Sub

End Module