Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
Лабораторная работа.6 7 ЭТТМиК.docx
Скачиваний:
0
Добавлен:
01.07.2025
Размер:
107 Кб
Скачать
☆

Технолгия выполнения работы

  1. Создать документ и набрать 2-3 абзаца текста. Сделать его копию. Выполнить последовательность действий, приводящую к решению задачи в этом тексте, при этом команды перемещения по тексту и выделения фрагментов вызывать клавиатурными сочетаниями (см. примечание в конце работы).

  2. Отменить все выполненные действия или перейти в копию документа. Включить режим записи макроса: Сервис – Макрос – Начать запись. В появившемся диалоговом окне указать имя макроса, указать, что макрос доступен только для текущего документа, иначе он запишется в шаблон Normal, назначить сочетание клавиш или кнопку на панели инструментов. Выполнить отрепетированные действия без ошибок. Остановить запись.

  3. Вернуть документ в исходное состояние , проверить действие макроса, запуская его назначенным сочетанием клавиш или кнопкой на панели инструментов.

  4. Перейти в окно редактора VBA командой Сервис – Макрос – Макросы, в появившемся окне выбрать имя макроса, нажать кнопку «Изменить». Просмотреть текст макроса. Если нужно, изменить отдельные команды. Проверить действие макроса после внесения изменений.

  5. Копировать текст макроса в отчет

Содержание отчета по данной работе

Включить в отчет по каждому макросу следующую информацию:

  1. Условие задачи.

  2. Решение задачи, оформленное в две колонки:

  • первая колонка содержит код макроса;

  • вторая колонка содержит для каждой инструкции макроса поясняющий текст.

  1. Результат применения макроса:

  • вид текста до применения макроса (исходный текст);

  • вид текста после применения макроса (измененный текст);

  • изображение кнопки, назначенной макросу;

  • изображение окна сообщений;

  1. Блок-схему алгоритма решения задачи 6.

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

  1. [Ctrl + Home] – поместить курсор в начало документа;

  2. [Ctrl + End] – поместить курсор в конец документа;

  3. [Shift + ] – выделить символ справа от курсора;

  4. [Shift + ] – выделить символ слева от курсора;

  5. [Ctrl + Shift + ] – выделить слово справа от курсора;

  6. [Ctrl + Shift + ] – выделить слово слева от курсора;

  7. [Ctrl + Shift + ] – выделить абзац справа от курсора;

  8. [Ctrl + Shift + ] – выделить абзац слева от курсора;

Образцы решения некоторых задач приведены ниже.

Лабораторная работа №7. Создание пользовательских функций

Задание. Разработать процедуры-функции, реализующие решение следующих задач.

Задача 1. Вычислить множество значений функции при изменении первого аргумента x[1;2] с шагом x = 0,1 и второго аргумента y[1;5] с шагом y=1 при a = 2,5. Варианты заданий приведены в таблице 1.

Примечание. Для каждого значения второго аргумента y, первый аргумент x принимает все значения.

Задача 2. Дана таблица из двух столбцов и 20 строк. В первом столбце записана символьная информация: “Фамилия Имя Отчество”. Получить во втором столбце таблицы строки вида “Фамилия И. О.”.

Задача 3. Вычислить множество значений функции на отрезке x[1;2] с шагом x = 0,1 при исходных данных a=1,5; b=2; c=-1,5. Варианты заданий приведены в таблице 2.

Задача 4. Вычислить множество значений функции на отрезке [1;10] с шагом 1,1 при a=2,1; Варианты заданий приведены в таблице 3.

Задача 5. Для вычисленных значений функции в первой задаче найти:

  1. минимальное значение функции;

  2. максимальное значение функции;

  3. сумму всех значений функции;

  4. количество точек;

  5. среднее значение функции.

Примечание. Для каждого пункта задания создать отдельную функцию

.

Таблица 1. Варианты заданий для задачи 1

Вариант

Функция

Изменение аргумента

Исходные данные

интервал

шаг

x[0;/2]

0,2

a=2,1

y[1;7]

1,2

x[1;3,7]

0,3

a=0,7

t[1;2,2]

0,3

x[1;2,5]

0,3

a=-0,7

y[4;7]

0,3

x[2;5]

0,5

a=0,4

y[1;2]

0,2

x[1;2,5]

0,3

a=2,1

t[2;4]

0,2

x[1;2]

0,2

b=-0,5

y[2;6]

0,5

x[2;5]

0,5

a=1,9

y[-1;1]

0,2

x[1;2]

0,2

a=-2,1

t[1;4]

0,3

x[0; /2]

0,2

b=1,2

y[0;2]

0,25

x[-2;0]

0,4

a=0,7

y[0;3]

0,3

Таблица 2. Варианты заданий для задачи 3

Вариант

Функция

Изменение аргумента

Исходные данные

интервал

шаг

x[-1;2]

0,15

a=2,3

b=3

x[-1;3]

0,17

a=2

b=-2,7

c=0,1

x[-2;2]

0,13

a=-5,35

b=2,3

x[1;6]

0,45

a=-3,75

b=6,7

c=3,15

x[0;8]

0,7

a=3,3

b=4

c=3,15

x[-2;5]

0,05

a=0,45

b=-7,93

x[-2;3]

0,45

a=0,17

b=-3,05

x[-3;3]

0,5

a=1,7

b=2,15

x[-1;5]

0,5

a=-1,3

b=3,25

x[-2;2]

0,3

a=-0,37

b=-4,81

Таблица 3. Варианты заданий для задачи 4

Вариант

Функция

Изменение аргумента

Исходные данные

интервал

шаг

x[0;7]

0,5

a=2,7

b=-0,27

t[0,1;1,1]

0,11

c=0,5

d=1,3

x[0,1;2]

0,15

a=1,5

t=2,2

x[0,9;2]

0,08

a=1,35

b=-2,67

t[1;5]

0,5

a=2,57

b=1,33

x[0;5]

0,35

a=1,2

b=3,13

x[-0;2]

0,15

a=2,25

b=-2,9

x[1;2]

0,1

a=1,13

b=1,3

x[2;3]

0,09

a=2,7

b=-1,05

t[0;3]

0,3

a=-0,5

b=2