Imports System

Public Module Module1

    Public Sub Main()

        Dim Number1, Number2 As Integer

        DIm Result As Decimal

        ' Addition

        Number1 = 96

        Number2 = 49

        Result = Number1 + Number2

        Console.WriteLine(Number1 & "+" & Number2 & " = " & Result)

        ' Subtraction

​

        Number1 = 96

        Number2 = 49

        Result = Number1 - Number2

        Console.WriteLine(Number1 & "-" & Number2 & " = " & Result)

        ' Multiplication

​

        Number1 = 96

        Number2 = 49

        Result = Number1 * Number2

        Console.WriteLine(Number1 & "*" & Number2 & " = " & Result)

        ' Division

​

        Number1 = 96

        Number2 = 49

        Result = Number1 / Number2

        Console.WriteLine(Number1 & "/" & Number2 & " = " & Result)

        ' Exponents

​

        Number1 = 96

        Number2 = 49

        Result = Number1 ^ Number2

        Console.WriteLine(Number1 & "^" & Number2 & " = " & Result)

​

    End Sub

End Module