Public Module volume_sphere
dim pi as decimal = 3.14159
Console.WriteLine("enter radius")
radius1 = Console.ReadLine()
volume = (4/3)*pi*radius1*radius1*radius1
console.writeline("- - - - - - - - - - - - - - - - - - - - - - - -")
Console.Write("volume is ")
Console.write(volume):console.writeline(" centimetre cubed")
console.writeline("- - - - - - - - - - - - - - - - - - - - - - - -")