Mencari Bilangan ganjil dan genap pada Visual Basic.Net

alfa6661
- December 01, 2011
2 (1 votes)
Rate :
Cara mencari bilangan ganjil dan genap menggunakan visual basic .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

Computer science education cannot make anybody an expert programmer any more than studying brushes and pigment can make somebody an expert painter

– Eric S. Raymond

Have a better explanation?

If you have comments about this post. Please write your comments below

No comments associated with this article