Imports System

Public Module Module1

    Public Sub Main()

        dim num, p, m, sum as integer

        m=0

        sum=0

        console.WriteLine("input number")

        num=console.ReadLine()

        console.WriteLine("input power")

        p=console.ReadLine()

        for 1 to 3

        m=num

        sum

    End Sub

End Module