Imports System

Public Module Module1

    Public Sub Main()

        dim array() as string ={"be","a","warrior","not","a","worrier"}

        Console.WriteLine(String.Join(" ", array(0)))

        Console.WriteLine(String.Join(" ", array(0), array(1)))

        Console.WriteLine(String.Join(" ", array(0), array(1), array(2)))

        Console.WriteLine(String.Join(" ", array(0), array(1), array(2), array(3)))

        Console.WriteLine(String.Join(" ", array(0), array(1), array(2), array(3), array(4)))

        Console.WriteLine(String.Join(" ", array(0), array(1), array(2), array(3), array(4), array(5)))

    End Sub

End Module