Module Module1
Sub Main()
dim rowcounter as integer
dim row as integer
Console.writeline("numbers of rows:")
row = Console.readline()
rowcounter = 0
dim columncounter as integer
columncounter = rowcounter - row
for rowcounter to row step 1
for i to columncounter step 1
Console.writeline(" ")
End Sub
End Module