Imports System.Console
Module demoadition
    Sub Main()
        Dim a, b As Integer
        WriteLine("enter a")
        a = ReadLine()
        WriteLine("enter b")
        b = ReadLine()
        WriteLine("Addition:" & a + b)
        WriteLine("Subtraction:" & a - b)
        WriteLine("multiplication:" & a * b)
        WriteLine("division:" & a / b)
        Read()
    End Sub

End Module