Question

How to calculate the volume of cone in VB.NET

Answer 1

Imports System
				
Public Module Module1
	Public Sub Main()
		Dim radius As Integer = 12
		Dim height As Integer = 25
		Dim pi As Double = 3.14159265359
       
		Dim cone_volume As Double = pi * (radius * radius) * height / 3
 
        Console.Write("Cone volume = " + CStr(cone_volume))
	End Sub
End Module





' run:
'
' Cone volume = 3769.911184308
'

 

70+ SQL courses for beginners and professionals