Visual Basic Bir Dizideki Tek Sayıların Adetini Bulma Örneği

"Visual Basic" Programlama dilinde "Bir Dizideki Tek Sayıların Adetini Bulma Örneği" ile ilgili örnek kod aşağıda gösterilmiştir.

Module Main

    Sub Main()
        
        Dim numbers() As Integer = {8, 3, 1, 6, 2, 4, 5, 9}
        Dim count As Integer = 0
        
        For i As Integer = 0 To numbers.Length - 1
            If numbers(i) Mod 2 <> 0 Then
                count += 1
            End If
        Next
        
        Console.WriteLine("Dizideki tek sayı adeti: " & count)
        
    End Sub
    
End Module



İlginizi Çekebilir

Visual Basic Hex Kodunu Stringe Çevirmek

Visual Basic Dosya Oluşturma

Visual Basic Bir Listede Birden Çok Olan Elemanları Göstermek

Visual Basic Dosya Kopyalama

Visual Basic Bir Dizindeki Tüm Dosyaların Silinmesi