Imports System

Public Module Module1

    Public Sub Main()

        Dim Num1, Num2, Num3, Sum1, Sum2 As Integer

        Num1 = 2000

        Num2 = 200

        Num3 = 50

        Sum1 = Num1-Num2

        Sum2 = Sum1 + Num3

        Console.WriteLine("The elephant weighs, " & Sum2 & " kg" )

    End Sub

End Module