Подсчет в заданном массиве количества элементов, превышающих заданное число - Visual Basic .NET

Узнай цену своей работы

Формулировка задачи:

Написать процедуру для подсчета в заданном массиве А(5,5) количества элементов превышающих заданное число В и ле-жащих на главной диагонали и выше нее.
Подскажите решение кому не сложно

Решение задачи: «Подсчет в заданном массиве количества элементов, превышающих заданное число»

textual
Листинг программы
Dim a(5,5) As Integer
Dim b As Integer
Dim indexer As Integer
Console.WriteLine("введите число В")
b = Convert.ToInt32(Console.ReadLine())
        For i As Integer = 0 To 5
            For j As Integer = 0 To 1
                Console.WriteLine("введите элемент A " & i.ToString & j.ToString)
                a(i,j) = Convert.ToInt32(Console.ReadLine())
                If (i = 0 And j = 0) Or (j = 1) Then
                    indexer = indexer +1
                End If      
            Next
        Next
Console.Write("Количество элементов =  " & indexer)
Console.ReadKey(True)

Оцени полезность:

14   голосов , оценка 3.786 из 5
Похожие ответы