Imports System

'Imports Microsoft.VisualBasic

Imports System.Math

​

Public Module Module1

    Public Sub Main()

        Dim decInput as Decimal

        Dim decSinNo as Decimal

        Dim decCosNo as Decimal

        Console.WriteLine("Enter a number.")

        decInput = Console.ReadLine()

        decSinNo = Sin(decInput)

        decCosNo = Cos(decInput)

        Console.WriteLine("The Sine of your number is: " & decSinNo )

        Console.WriteLine("The Cosine of your number is: " & decCosNo )

        End Sub

End Module