Imports System

Public Module Module1

    Public Sub Main()

        '' Program: even and odd numbers      3/1/21    Kiki N 

        'dim inteven as integer 

        'dim intodd as integer 

        dim i as integer = 1

        console.WriteLine("odd numbers:")

        do while i <= 20

            i = i + 2 

            console.WriteLine(i)

        loop 

        dim k as integer = 0 

        console.WriteLine("even numbers:")

        do while k <= 20 

            k = k + 2

            console.WriteLine(k)

        loop

    End Sub

End Module