Imports System

Imports Microsoft.VisualBasic

​

Public Module Module1

    sub Main()

        Dim diam, angle as integer

        console.writeline("Enter the diameter of the circle: ")

        diam = Console.ReadLine()

        console.writeline("The radius of this circle is: " & diam/2)

        Console.WriteLine("The area of the circle is: " & 3.14*((diam/2)^2))

        Console.WriteLine("The circumference of the circle is: " & 3.14*diam)

        Console.WriteLine("Enter the arc angle of the circle: ")

        angle = console.ReadLine()

        Console.WriteLine("The arc length of the circle is :" & (3.14*diam)*angle/360)

    End sub

End Module

​