Mencari Bilangan ganjil dan genap Console Application VB.Net

Bilangan ganjil adalah bilangan yang jika dibagi 2 memiliki sisa 1. Sedangkan bilangan genap adalah bilangan yang jika dibagi 2, tidak memiliki sisa atau sisanya adalah nol. Contohnya jika kita punya bilangan 10 di bagi 2 akan menghasilkan 5 tanpa sisa. Sedangkan 15 jika dibagi 2 akan menghasilkan 7 dan sisa 1.
 

Sub Main()
        Dim a As Integer
        Console.WriteLine("---- Bilangan genap ----")
        For a = 1 To 20
            If a Mod 2 = 0 Then
                Console.WriteLine(a)
            End If
        Next
        Console.WriteLine()

        Console.WriteLine("----Bilangan ganjil----")
        For a = 1 To 20
            If a Mod 2 <> 0 Then
                Console.WriteLine(a)
            End If
        Next
        Console.ReadKey()
    End Sub