Imports System
Public Class Program
Public Shared Sub Main()
Dim length, width, height As Single
length = 6
width = 3
height = 4
Dim surfacearea As Single = 2 * (length * width + width * height + height * length)
Console.WriteLine("Surface Area of Cuboid is = " & surfacearea)
End Sub
End Class
' run:
'
' Surface Area of Cuboid is = 108
'