Imports System
Public Class exercise37
Public Shared Sub Main()
Dim number, number2 As Integer
Dim i As Integer
Console.Write("Enter first number: ")
number = Convert.ToInt32(Console.ReadLine())
Console.Write("Enter last number: ")
number2 = Convert.ToInt32(Console.ReadLine())
For i = number To number2
Console.Write("{0} ", i)
Next
Console.WriteLine()
i = number
While i <= number2
Console.Write("{0} ", i)
i += 1
End While
Console.WriteLine()
i = number
Do
Console.Write("{0} ", i)
i += 1
Loop While i <= number2
Console.WriteLine()
End Sub
End Class