Imports System
Public Class exercise29
Public Shared Sub Main()
Dim num, amount As Integer
Dim i As Integer
Console.Write("Enter a number: ")
num = Convert.ToInt32(Console.ReadLine())
Console.Write("Enter an amount: ")
amount = Convert.ToInt32(Console.ReadLine())
For i = 0 To amount - 1
Console.Write(num)
Next
Console.WriteLine()
i = 0
While i < amount
Console.Write(num)
i += 1
End While
Console.WriteLine()
i = 0
Do
Console.Write(num)
i += 1
Loop While i < amount
End Sub
End Class