Imports System
Public Module Module1
Public Sub Main()
Dim a As Integer = 11
Dim b As Integer = 19
Dim right_angle_triangle_area As Double = (a * b) / 2.0
Console.Write("Right Angle Triangle Area = " + CStr(right_angle_triangle_area))
End Sub
End Module
' run:
'
' Right Angle Triangle Area = 104.5
'