Подсчитать количество элементов массива больших 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д