Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Учебное пособие VBA.doc
Скачиваний:
2
Добавлен:
01.07.2025
Размер:
693.25 Кб
Скачать

Глава 5. Лабораторные работы и практические задания

Лабораторная работа N1

Создание функций пользователя с линейной структурой

алгоритма

Рассмотрим пример решения задачи по разработке алгоритма и составления функции пользователя на VBA в MS Excel с линейной структурой:

Вычислить значение функции у = 2х3 - х2 + 3х +5 для введенного значения х.

Составим блок-схему алгоритма.

Составим программу на VBA в виде функции пользователя.

Function y(x)

y = 2*x^3 - x^2 + 3*x + 5

End Function

Практическое задание

1. Составить блок-схемы алгоритмов и записать функции на VBA для решения следующих задач:

1) По заданному значению R найти площадь круга (по формуле S=πR2).

2) По заданным значениям сторон а, в, с найти площадь треугольника по формуле Герона , где р – полупериметр треугольника. (Без проверки условия на существование треугольника.)

2. Запустить MS Excel на ПК.

3. Открыть редактор VBA с помощью команды Сервис → Макрос→ Редактор Visual Basic.

4. В редакторе VBA открыть окно модуля для записи программного кода (текста составленных функций) с помощью команды InsertModule (Вставка→Модуль).

5. В окне модуля набрать тексты составленных функций для решения 1-й и 2-1 задачи, а также функции рассмотренной в качестве примера.

6. Перейти в окно электронной таблицы (ЭТ) через кнопку на Панели Задач.

7. Вызвать Мастер функций (Вставка→Функция или fx в строке формул).

В окне диалога Мастера функций в поле Категории выбрать в раскрывающемся списке (щелчок по ▼) категорию Определенные пользователем. Ниже должен появиться список заданных пользователем функций (3 функции).

8. Проверьте правильности работы функций.

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

Например, при х = 1 у = 9, при х = 0 у = 5, при х = –2 у = –21;

при R=1 Sкруга = π ≈3,14159, при R=2 Sкруга ≈12,56636;

при А=2, В=7, С=6 Sтреуг. ≈ 5,562148865;

Лабораторная работа n2 Создание функций пользователя с разветвляющейся структурой алгоритма

Рассмотрим пример решения задачи по разработке алгоритма и составления функции пользователя на VBA в MS Excel с разветвляющейся структурой:

Вычислить значение функции Z в заданной точке x:

Составим блок-схему алгоритма

Составим программу на VBA, оформленную в виде функции пользователя.

Function Z(x)

If x<0 Then Z = x ^ 2 – 2 Else Z = x ^ 3 + 5

End Function

Практическое задание

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

Вычислить значение функции y в заданной точке x : .

Для x, не попадающих в область определения, выдавать сообщение «не определена». (Корень можно вычислить через функцию SQR или возведение в степень)

2. Запустить MS Excel на ПК.

3. Открыть редактор VBA с помощью команды Сервис → Макрос→ Редактор Visual Basic.

4. В редакторе VBA открыть окно модуля для записи программного кода (текста составленных функций) с помощью команды InsertModule (Вставка→Модуль).

5. В окне модуля набрать текст составленной функций, а также функции рассмотренной в качестве примера.

6. Перейти в окно ЭТ через кнопку на Панели Задач.

7. Вызвать Мастер функций (Вставка→Функция или fx в строке формул).

В окне диалога Мастера функций в поле Категории выбрать в раскрывающемся списке (щелчок по ▼) категорию Определенные пользователем. Ниже должен появиться список заданных пользователем функций.

8. Проверить правильности работы заданных функций, используя Мастер функций. Например, при х = 1 Z = 6, при х = 3 Z = 32, при х = –2 Z = 2; при х = –1 f ≈ –0,33333, при х = 7 f ≈0,066667, при х = 2 f=”не определена”.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]