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 ) 'It makes the number go into decimals 

​

    End Sub

End Module