Подсчитать количество элементов массива больших 5 и меньших 10 - VB

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

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

Разработать проект решения задачи с применением одномерных массивов: В заданном одномерном массиве, состоящем из 10 элементов, подсчитать количество элементов больших 5 и меньших 10.

Решение задачи: «Подсчитать количество элементов массива больших 5 и меньших 10»

textual
Листинг программы
Function counter(A() As integer, Optional k as integer = 1) As integer
            If  k=Ubound(A,1) then
                If A(k)> 5 and A(k) < 10 then
                   counter=1
                else
                   counter=0
                end if
            Else
                If A(k)> 5 and A(k) < 10 then
                   counter=1+counter(A(),k+1)
                else
                   counter=counter(A(),k+1)
                end if
            End if         
End Function

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

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

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