Imports System

Public Module Module1

    Public Sub Main()

        Dim N as integer

        Dim M as integer 

        Dim resultado as double

        Dim Result as double

        Console.WriteLine("escribe N:")

        N = Console.ReadLine()

        Console.WriteLine("Escribe M:")

        M = Console.ReadLine()

        resultado = N ^ M

        Console.WriteLine("el resultado de n ^ m es :{0}",resultado)

        Result = M ^ N 

        Console.WriteLine("el resultado de m ^ n es  :{0}",Result)

    End Sub

End Module