Imports System
Public Module Module1
Public Sub Main()
dim n1 as integer
dim n2 as integer
dim n3 as integer
console.WriteLine("what's your 2 favourite numbers.")
console.WriteLine("input them one bt one")
n1 = console.ReadLine()
n2 = console.ReadLine()
console.WriteLine("want to do with those numbers (+, -, *,/)")
n3 = console.ReadLine()
select case n3
case ("+")
console.WriteLine(n1+n2)
case ("-")
console.WriteLine(n1-n2)
console.WriteLine(n2-n1)
case ("*")
console.WriteLine(n1*n2)
case ("/")
console.WriteLine(n1/n2)
console.WriteLine(n2/n1)
case else ("i")
console.WriteLine("invalid entry")
end select
End Sub
End Module
