Imports System

Public Module Module1

    Public Sub Main()

        dim num1 as integer

        dim num2 as integer

        dim answer as decimal

        dim calc as string 

        console.writeline("welcome to my calculator" )

        console.writeline ("enter your 1st number")

        num1=console.ReadLine()

        console.writeline ()

        console.writeline ("enter you 2nd number")

        num2=console.ReadLine()

        console.writeline (" + to add the numbers or press - to subtract the numbers x to multiply the numbers d to divide the numbers ")

        calc=console.ReadLine()

        if calc="+" then

            answer=num1+num2

        end if 

        if calc="-" then

            answer=num1-num2

        end if 

        if calc="x" then

            answer=num1*num2

        end if 

        if calc="d" then

            answer=num1/num2

        end if 

        console.writeline ("the answer is:")

        console.writeline (answer)

    End Sub

End Module