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