Imports System

Public Module Module1

    Public Sub Main()

        'Declare variables

        Dim Number1 As INTEGER

        Dim Number2 As INTEGER

        Dim Result As INTEGER

        Console.WriteLine("Enter number 1")

        Number1 = Console.ReadLine()

        Console.WriteLine("Enter number 2")

        Number2 = Console.ReadLine()

        Result = Number1 + Number2

        Console.WriteLine(Number1 & " + " & Number2 & " = "& Result)

    End Sub

End Module

'PSEUDOCODE

' INTEGER: Number1, Number2, Result

' OUTPUT "Enter Number1"

' INPUT Number1

' INPUT Number2

' Result <-- Number1 + Number2

' OUTPUT Number1, " + ", Number2, "=", Result