Imports System

Public Module Module1

    Dim no1, no2, prod, quo, sum, diff as Integer

    Public Sub Main()

        Console.Write("Enter No.1: ")

        no1 = console.ReadLine

        Console.Write("Enter No.2: ")

        no2 = console.ReadLine

        prod = no1 * no2

        quo = no1 / no2

        sum = no1 + no2

        diff = no1 - no2

        Console.Writeline("--------------------------")

        Console.Writeline("PRODUCT:" & no1 & " * "& no2 &" = " & prod)

        Console.Writeline("QUOTIENT:"  & no1 & " / "& no2 &" = " & quo)

        Console.Writeline( "SUM:" & no1 & " + "& no2 &" = " & sum)

        Console.Writeline( "DIFFERENCE:" & no1 & " - "& no2 &" = " & diff)

    End Sub

End Module