Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
РГР VBA_.doc
Скачиваний:
0
Добавлен:
01.05.2025
Размер:
513.02 Кб
Скачать

Вариант №8

Создайте рабочую книгу под именем, содержащим номер студенческой группы, вашу фамилию и номер варианта, например, ПГС-101 Петров (В.12).

Задание 1

Создать пользовательскую функцию, которая определяет, сколько в заданном диапазоне элементов, не равных нулю. Исходные данные для тестирования задать самостоятельно. На рабочем листе Excel “Задание 1” создать таблицу, содержащую исходные данные и результаты вычисления.

Задание 2

Используя VBA, создать процедуру табулирования функции

для a = 0; 0,1; 0,15; 0,2; 0,25; 0,3; 0,4; 0,5; 0,6; 0,7; 0,8; 0,9; 1,

где

пренебречь членами ряда, по абсолютному значению меньшими 10-6.

Командную кнопку для запуска процедуры и результаты выполнения представить на рабочем листе Задание2.

Задание 3

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

На рабочем листе Задание3 создать таблицу, содержащую результат выполнения процедуры, и командную кнопку для запуска процедуры.

Вариант №9

Создайте рабочую книгу под именем, содержащим номер студенческой группы, вашу фамилию и номер варианта, например, ПГС-101 Петров (В.12).

Задание 1

Создать пользовательскую функцию, определяющую произведение ненулевых элементов заданного диапазона. Исходные данные для тестирования задать самостоятельно. На рабочем листе Excel “Задание 1” создать таблицу, содержащую исходные данные и результаты вычисления.

Задание 2

Используя VBA, создать процедуру табулирования функции

для a = 1,5; 1,6; 1,7; 1,8; 1,9; 2; 2,2; 2,4; 2,6; 3,

где

Командную кнопку для запуска процедуры и результаты выполнения представить на рабочем листе Задание2.

Задание 3

Сформировать на рабочем листе Задание3 одномерный массив, состоящий из положительных, отрицательных и нулевых элементов. Используя VBA, создать новый массив, состоящий из элементов исходного массива, каждый третий элемент которого заменен на ноль, а каждый пятый – на первый элемент массива.

На рабочем листе Задание3 создать таблицу, содержащую результат выполнения процедуры, и командную кнопку для запуска процедуры.

Вариант №10

Создайте рабочую книгу под именем, содержащим номер студенческой группы, вашу фамилию и номер варианта, например, ПГС-101 Петров (В.12).

Задание 1

Создать пользовательскую функцию, которая определяет максимальный по модулю элемент заданного диапазона. Исходные данные для тестирования задать самостоятельно. На рабочем листе Excel “Задание 1” создать таблицу, содержащую исходные данные и результаты вычисления.

Задание 2

Используя VBA, создать процедуру табулирования функции

для a = 0,5; 0,6; 0,7; 0,8; 0,9; 1,25; 1,5; 1,75; 3,75,

где

пренебречь членами ряда, по абсолютному значению меньшими 10-7.

Командную кнопку для запуска процедуры и результаты выполнения представить на рабочем листе Задание2.

Задание 3

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

На рабочем листе Задание3 создать таблицу, содержащую результат выполнения процедуры, и командную кнопку для запуска процедуры.