Imports System

Public Module Module1

    Public Sub Main()

        Dim Respuesta,resp,reciduo,recid,a,b as Double 

        Console.WriteLine("Escriba el Primer número (a):")

        a = Console.ReadLine()

        Console.WriteLine("Escriba el Segundo número (b):")

        b = Console.ReadLine()

        Respuesta = a / b 

        resp = b / a

        reciduo = a Mod b

        recid = b Mod a

        Console.WriteLine("La División de a y b es: {0}",Respuesta)

        Console.WriteLine("Su mod es: {0}",reciduo)

        Console.WriteLine("La División de b y a es: {0}",resp)

        Console.WriteLine("Su mod es: {0}",recid)       

    End Sub

End Module