Imports System

Public Module Module1

    Public Sub Main()

        dim weight as integer

        dim height as integer

        dim bmi as integer

        console.writeline("Please enter your weight in kilograms")

        weight = console.readline()

        console.writeline("Please enter your height in metres")

        height = console.readline()

        bmi = ( weight / height )

        console.writeline(bmi)

        if bmi < 18.5 then

            console.writeline("You are underweight")

        elseif bmi < 24.9 then

            console.writeline("You are a very healthy weight. Keep it up!")

        elseif bmi < 29.9 then

            console.writeline("You are a bit overweight. Remember to keep doing lost of exercise")

        elseif bmi > 30 then

            console.writeline("You are obese! You might want to do more exercise and eat a bit less")

        end if

​

    End Sub

End Module