Imports System

Public Module Module1

    Public Sub Main()

        dim n1 as integer

dim n2 as integer

dim n3 as integer

Console.WriteLine("ingrese un valor mayor a 2 y que sea par de 100")

n1=console.ReadLine()

Console.WriteLine("ingrese otro valor mayor a 2 y que sea par de 100")

n2=console.ReadLine()

if n1 mod 2 = 0 and n1 <= 100 and n2 mod 2 = 0 and n2 <= 100

n3=n1 + n2

console.WriteLine("La suma de su operacion es" & n3)

else

console.WriteLine("Lo siento pero ese numero no es valido")

end if

    End Sub

End Module