Imports System

Public Module Module1

    Public Sub Main()

​

        'Mateo Hernandez

        'Math Functions 2

        '10-31-21

        Dim numberChoice As Integer

        Dim numberAbs As Integer

        Dim numberRoot As Single

        Dim secondnumberChoice As Integer

        Dim total As String

        Console.WriteLine("Please enter your whole number")

        numberChoice = Console.ReadLine()

        Console.WriteLine("Please enter your second whole number")

        secondnumberChoice = Console.ReadLine()

        numberAbs = Math.Abs(numberChoice)

        numberRoot = Math.Sqrt(numberchoice)

        Console.WriteLine("The absolute value of " & numberChoice & " is " & numberRoot & "")

        Console.WriteLine("The square root of " & numberChoice & " is " & numberAbs & "")

        total = "" & numberChoice + secondnumberChoice & ""

        Console.WriteLine("The sum of " & numberChoice & " and " & secondnumberChoice & " is " & total & "")

        total = "" & numberChoice - secondnumberChoice & ""

        Console.WriteLine("The difference of " & numberChoice & " and " & secondnumberChoice & " is " & total & "")

        total = "" & numberChoice * secondnumberChoice & ""

        Console.WriteLine("The product of " & numberChoice & " and " & secondnumberChoice & " is " & total & "")

        total = "" & numberChoice / secondnumberChoice & "" 

        Console.WriteLine("The quotient of " & numberChoice & " and " & secondnumberChoice & " is " & total & "")

        Console.WriteLine("The maximum of " & numberChoice & " and " & secondnumberChoice & " is " & secondnumberChoice & "")

        Console.WriteLine("The minimun of " & numberChoice & " and " & secondnumberChoice & " is " & numberChoice & "")

    End Sub

End Module