Module VBModule
    Sub Main()
        for i as Integer = 1 to 5
            Console.WriteLine(248832 ^ (1/i))
        next
    End Sub
End Module