Imports System

Namespace CalculatorApp
    Public Class Calculator
        ' Method to add two numbers
        Public Function Add(num1 As Double, num2 As Double) As Integer
            Return CInt(num1 + num2)
        End Function

        ' Method to subtract the second number from the first
        Public Function Subtract(num1 As Double, num2 As Double) As Integer
            Return CInt(num1 - num2)
        End Function

        ' Method to multiply two numbers
        Public Function Multiply(num1 As Double, num2 As Double) As Integer
            Return CInt(num1 * num2)
        End Function

        ' Method to divide the first number by the second
        ' Throws an exception if the second number is zero
        Public Function Divide(num1 As Double, num2 As Double) As Integer
            If num2 = 0 Then
                Throw New DivideByZeroException("Division by zero is not allowed.")
            End If
            Return CInt(num1 / num2)
        End Function
    End Class

    Module Program
        Sub Main()
            Dim calculator As New Calculator()

            Dim num1 As Double = 10
            Dim num2 As Double = 5

            ' Assign the result of calculator.Add to InvokeArguments.ADD
            InvokeArguments.ADD = calculator.Add(num1, num2)
            Console.WriteLine("Subtraction: " & calculator.Subtract(num1, num2))
            Console.WriteLine("Multiplication: " & calculator.Multiply(num1, num2))
            Console.WriteLine("Division: " & calculator.Divide(num1, num2))
        End Sub
    End Module
End Namespace