Question

How to find the frequency of odd and even numbers in a given matrix with VB.NET

Answer 1

Imports System

Public Class Program
	Public Shared Sub Main()
        Dim m As Integer(,) = {
								{1, 0, 2},
								{3, 5, 6},
								{7, 4, 1}}
		
        Dim rows As Integer = m.GetLength(0)
        Dim cols As Integer = m.GetLength(1)
		
        Dim odd As Integer = 0, even As Integer = 0

        For i As Integer = 0 To rows - 1
            For j As Integer = 0 To cols - 1
                If m(i, j) Mod 2 = 0 Then
                    even += 1
                Else
                    odd += 1
                End If
            Next
        Next

        Console.WriteLine("The frequency of odd numbers = " & odd)
        Console.WriteLine("The frequency of even numbers = " & even)
    End Sub
End Class




' run:
'
' The frequency of odd numbers = 5
' The frequency of even numbers = 4
'
 

 

70+ SQL courses for beginners and professionals