Module modmathemat
    Sub Main()


        ' variables for storing user input
        Dim firstNumber, secondNumber As String

        ' variables used in addition calculation
        Dim number1, number2, Answers As Integer

        ' read first number from user
        Console.Write("Please enter the first number: ")
        firstNumber = Console.ReadLine()

        ' read second number from user
        Console.Write("Please enter the second number: ")
        secondNumber = Console.ReadLine()

        ' convert input values to Integers    
        number1 = firstNumber
        number2 = secondNumber

        Answers = number1 + number2 ' add numbers

        ' display sum
        Console.WriteLine("The sum is {0}", Answers)

        Answers = number1 * number2 ' Multiply numbers

        ' display product    
        Console.WriteLine("The product is {0}", Answers)


        Answers = number1 \ number2 ' Float division of the numbers

        ' display float division result
        Console.WriteLine("The answer after float division of given numbers is {0}", Answers)


        Answers = number1 / number2 ' division of the numbers

        ' display division result
        Console.WriteLine("The answer after division of given numbers is {0}", Answers)

        Answers = number1 ^ number2 ' Power of numbers numbers

        ' display Power of given numbers
        Console.WriteLine("The power of {0} and {1} is {2}", number1, number2, Answers)

        Console.Write("Please press  enter to close this Applcation")
        firstNumber = Console.ReadLine()

    End Sub ' Main

End Module ' modmathemat

Module Module1

    Sub Main()
        Dim var1, var2, var3 As Decimal
        Console.Write("Please Type the first Variable Value:")
        var1 = Console.ReadLine()
        Console.Write("Please Type the 2nd Variable Value:")
        var2 = Console.ReadLine()

        var3 = var1 * var2
        Console.WriteLine("{0} x {1} = {2}", var1, var2, var3)
        var3 = var1 / var2
        Console.WriteLine("{0} / {1} = {2} (Float Point Division)", var1, var2, var3)
        var3 = var1 \ var2
        Console.WriteLine("{0} \ {1} = {2} (Integer Division)", var1, var2, var3)
        var3 = var1 ^ var2
        Console.WriteLine("{0} ^ {1} = {2} ", var1, var2, var3)
    End Sub

End Module