Imports System

Public Module Module1

    Public Sub Main()

        Dim g1, g2 as integer

        Dim suma,resta, multiplicacion as integer 

        dim division as double

        dim opcion as integer

        Console.WriteLine("ingrese el numero")

        g1=console.ReadLine()

        Console.WriteLine("ingrese segundo numero")

        g2=console.ReadLine()

        console.WriteLine("Que operacion quieres realizar?")

        console.writeline("1. suma")

        console.writeline("2. resta")

        console.writeline("3. multiplicacion")

        console.writeline("4. division")

        opcion =console.readline() 

        if opcion = 1 then 

         suma = g1+g2

            console.writeline("suma e:" &suma)

        end if

        if opcion =2 then

            resta= g1-g2 

            console.WriteLine("resta e:" &resta)

        end if

        if opcion =3 then

            multiplicacion= g1*g2

            console.WriteLine("multiplicacion e:" &multiplicacion)

        end if

    End Sub

End Module