Sphere, float Learn programming with Visual Basic (VB.net) exercises

Lesson:

Basic Data Types

Exercise:

Sphere, float 60


Objetive:

Calculate the surface and volume of a sphere, given its radius (surface = 4 * pi * radius squared; volume = 4/3 * pi * radius cubed).

Hint: for "float" numbers, you must use Convert.ToSingle(...)


Code:

Imports System
Public Class exercise59
    Public Shared Sub Main()
        Dim radius As Single
        Dim pi As Single = 3.1415926535F
        Console.Write("Radius? ")
        radius = Convert.ToSingle(Console.ReadLine())
        Console.WriteLine(4 * pi * (radius * radius))
        Console.WriteLine(4 / 3 * pi * (radius * radius * radius))
    End Sub
End Class