Imports System

Public Module Module1

    Public Sub Main()

        DIM unit as integer

        DIM bill as integer 

        Console.WriteLine("Enter your total units")

        unit=Console.ReadLine()

        If unit>0 and unit=<100 then 

            bill = unit*13

        elseif unit>100 and unit=<300 then 

            bill=1300+(unit-100)*20

        elseif (unit>300) then

            bill= 1300+4000+(unit-200)*30

        end if

        Console.WriteLine("Your bill is "& bill &"")

    End Sub

End Module