Найти в одномерном массиве максимальный элемент среди элементов с четными индексами - VBA
Формулировка задачи:
Составить блок-схему вычисления и программу в VBA:
поиск максимального элемента среди элементов одномерного массива с четными индексами
Решение задачи: «Найти в одномерном массиве максимальный элемент среди элементов с четными индексами»
textual
Листинг программы
Function maxEven(A() As integer, Optional i as integer=0, Optional m as integer=0) As integer If i=0 then maxEven=maxEven(A(),4,A(2)) elseIf i > Ubound(A,1) then maxEven=m else maxEven=maxEven(A(),i+2,iif(A(i) > m,A(i),m)) end if End Function
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д