Imports System

Public Module Module1

    Public Sub Main()

        Dim NumberOfRows  as Integer = console.ReadLine()

        Dim NumberOfColumns as Integer = 0

        Dim Symbol as Char = console.ReadLine()

        For Rowcounter = 1 to NumberOfRows 

        For ColumnCounter = 1 to NumberOfColumns

                Console.Write(Symbol)

            next

        Console.writeline(symbol)

    NumberOfColumns = NumberOfColumns + 1

        next

    End Sub

End Module