Imports System

Public Module Module1

    Public Sub Main()

        dim height, weight as string

        Console.WriteLine("What is your height in inches?")

        height = console.ReadLine()

        console.Writeline("What is your weight in stones?")

        weight = console.readline

        height = height * 2.54

        weight =  weight * 6.364

        console.WriteLine("Your height in centimetres is: " & height)

        console.WriteLine("your weight in kilograms is: " & weight)

        console.ReadLine()

    End Sub

End Module