Задание. Разработка функции

Лабораторная работа № 20.
ФУНКЦИИ, ВОЗВРАЩАЮЩИЕ МАССИВЫ

1. Задание

Разработать функцию, выполняющую указанное задание. Функция должна получать диапазон для обработки, а также, при необходимости, заданное число или заданный интервал, и возвращать массив. Для проверки работоспособности функции использовать её для вставки формулы массива.

1. Составьте функцию, которая находит в каждой строке диапазона количество элементов, больших удвоенного минимума всех элементов диапазона.

2. Составьте функцию, которая находит в каждом столбце диапазона количество элементов, больших удвоенного минимума всех элементов диапазона.

3. Составьте функцию, которая проверяет в каждой строке диапазона наличие элементов, больших половины максимума всех элементов диапазона.

4. Составьте функцию, которая проверяет в каждом столбце диапазона наличие элементов, больших удвоенного минимума всех элементов диапазона.

5. Составьте функцию, которая находит в каждой строке диапазона количество элементов, больших среднего арифметического значения всех элементов диапазона.

6. Составьте функцию, которая находит в каждом столбце диапазона количество элементов, больших среднего арифметического значения всех элементов диапазона.

7. Составьте функцию, которая проверяет в каждой строке диапазона наличие элементов, больших среднего арифметического значения всех элементов диапазона.

8. Составьте функцию, которая проверяет в каждом столбце диапазона наличие элементов, больших среднего арифметического значения всех элементов диапазона.

9. Составьте функцию, которая находит в каждой строке диапазона количество элементов, больших половины максимума всех элементов диапазона.

10. Составьте функцию, которая находит в каждом столбце диапазона количество элементов, больших половины максимума всех элементов диапазона.

11. Составьте функцию, которая проверяет в каждой строке диапазона наличие элементов, больших половины максимума всех элементов диапазона.

12. Составьте функцию, которая проверяет в каждом столбце диапазона наличие элементов, больших половины максимума всех элементов диапазона.

13. Составьте функцию, которая находит в каждой строке диапазона количество элементов, больших среднего геометрического всех элементов диапазона[*].

14. Составьте функцию, которая находит в каждом столбце диапазона количество элементов, больших среднего геометрического всех элементов диапазона.

15. Составьте функцию, которая проверяет в каждой строке диапазона наличие элементов, больших среднего геометрического всех элементов диапазона.

16. Составьте функцию, которая проверяет в каждом столбце диапазона наличие элементов, больших среднего геометрического всех элементов диапазона.

17. Составьте функцию, которая находит в каждой строке диапазона количество элементов, меньших удвоенного минимума всех элементов диапазона.

18. Составьте функцию, которая находит в каждом столбце диапазона количество элементов, меньших удвоенного минимума всех элементов диапазона.

19. Составьте функцию, которая проверяет в каждой строке диапазона наличие элементов, меньших половины максимума всех элементов диапазона.

20. Составьте функцию, которая проверяет в каждом столбце диапазона наличие элементов, меньших удвоенного минимума всех элементов диапазона.

21. Составьте функцию, которая находит в каждой строке диапазона количество элементов, меньших среднего арифметического значения всех элементов диапазона.

22. Составьте функцию, которая находит в каждом столбце диапазона количество элементов, меньших среднего арифметического значения всех элементов диапазона.

23. Составьте функцию, которая проверяет в каждой строке диапазона наличие элементов, меньших среднего арифметического значения всех элементов диапазона.

24. Составьте функцию, которая проверяет в каждом столбце диапазона наличие элементов, меньших среднего арифметического значения всех элементов диапазона.

25. Составьте функцию, которая находит в каждой строке диапазона количество элементов, меньших половины максимума всех элементов диапазона.

26. Составьте функцию, которая находит в каждом столбце диапазона количество элементов, меньших половины максимума всех элементов диапазона.

27. Составьте функцию, которая проверяет в каждой строке диапазона наличие элементов, меньших половины максимума всех элементов диапазона.

28. Составьте функцию, которая проверяет в каждом столбце диапазона наличие элементов, меньших половины максимума всех элементов диапазона.

29. Составьте функцию, которая находит в каждой строке диапазона количество элементов, больших среднего геометрического всех элементов диапазона.

30. Составьте функцию, которая находит в каждом столбце диапазона количество элементов, больших среднего геометрического всех элементов диапазона.

2. Разработка функции

1. Запустите приложение Microsoft Excel и сохраните файл Книга1 в своей рабочей папке под именем Функция массива.xlsm (не забудьте изменить расширение файла).

2. Откройте редактор VBE и вставьте новый модуль.

3. В появившемся модуле напишите инструкцию Option Explicit, для того чтобы избежать использования необъявленных переменных.

4. Вставьте в модуль функцию.

5. Добавьте описание параметров и типа результата функции.

6. Наберите текст функции. Сначала необходимо найти максимум/минимум/среднее арифметическое/среднее геометрическое для всего диапазона, а затем – нужно значение для каждой строки или каждого столбца.

7. Обратите внимание, что одномерный массив соответствует диапазону, состоящему из одной строки. Если в задаче сказано найти что-то для каждого столбца, то результат как раз представляет собой диапазон из одной строки, и в функции можно объявлять и возвращать одномерный массив. Если же в задаче сказано найти что-то для каждой строки, то результат представляет собой диапазон из одного столбца. В этом случае в функции надо объявить двумерный массив, состоящий из нескольких строк и одного столбца.

8. На рабочем листе наберите исходные данные для проверки разработанной функции.

9. Выделите диапазон, куда необходимо поместить результат, и в строку формул введите вызов функции. Поскольку функция возвращает массива, ввод формулы надо завершать нажатием комбинации клавиш Ctrl + Shift + Ввод.

10. Проверьте работу функции.

11. Если функция работает корректно, покажите результаты работы преподавателю.

12. Закройте приложение Microsoft Excel.

3. Вопросы для контроля

1. Как объявить динамический массив?

2. Как изменить размер динамического массива?

3. Какие способы перебора ячеек диапазона существуют в языке VBA? Чем отличаются эти способы?

4. Как вставить формулу массива?

[*] Среднее геометрическое n положительных чисел x₁, x₂, …, x_n – это корень n-ой степени из произведения x₁ ž x₂ ž … ž x_n.