Imports System
Public Class exercise84
Public Shared Sub Main()
Dim n, width, height As Integer
Dim row, column As Integer
Console.Write("Enter a number: ")
n = Convert.ToInt32(Console.ReadLine())
Console.Write("Enter the desired width: ")
width = Convert.ToInt32(Console.ReadLine())
Console.Write("Enter the desired height: ")
height = Convert.ToInt32(Console.ReadLine())
For row = 0 To height - 1
For column = 0 To width - 1
Console.Write(n)
Next
Console.WriteLine()
Next
End Sub
End Class