Question

Visual Basic:

The federal government developed the body mass index (BMI) to determine ideal weights. Body mass index is calculated as 703 times the weight in pounds, divided by the square of the height in inches, and then round to the nearest whole number. Define a function that accepts a person’s weight and height as inputs and returns the person’s health status (A BMI of 19 to 25 corresponds to a healthy status).

Answer 1

Visual Basic Code (Console Application)

Module Module1 Sub Main() Dim weight As Double Dim height As Double '** Inputting weight from user Console.Write("Enter weight in pounds: ") weight = Double.Parse(Console.ReadLine()) '** Inputting height from user Console.Write("Enter height in inches: ") height = Double.Parse(Console.ReadLine()) '** Printing result Console.WriteLine(vbCrLf + "Your health status is: " + getHealthStatus(weight, height)) Console.ReadKey() End Sub ''' ''' Function to calculate the BMI based on weight and height entered and decides the health status based on calculated BMI ''' ''' ''' ''' ''' Returns Health status of the user ''' Function getHealthStatus(ByVal weight As Double, ByVal height As Double) As String '*** Calculating the BMI Dim BMI As Int16 = Math.Round(703 * weight / Math.Pow(height, 2)) Dim status As String = "" '*** Deciding the health status based on BMI If BMI < 19 Then status = "Under Weight" ElseIf BMI >= 19 And BMI <= 25 Then status = "Healthy" ElseIf BMI > 25 And BMI <= 30 Then status = "Over Weight" ElseIf BMI > 30 Then status = "Obese" End If Return status End Function End Module

OUTPUT

file:///C:/Users/User/Documents/Visual Studio 2010/Projects/BMI Enter weight in pounds: 116.845 Enter height in inches: 64.76378 our health status is: Healthy