Лабораторная работа №13

1. Загрузить MS Word
2. Открыть редактор VBA (Сервис~Макрос~Редактор Visual Basic)
3. Вставить новую форму диалога и расположить на ней соответствующие элементы (Надпись и Кнопку).
4. Изменить свойство Caption у всех элементов формы: UserForm1.Caption=Задание 1; Label1.Caption=Линейный алгоритм; CommandButton1.Caption=Решение
5. Написать программу для решения следующей задачи:

Вычислить значение функции при А, В и С — константах (задать значения самостоятельно) и произвольном Х(значение ввести с клавиатуры)

1. Вставить новую форму диалога и расположить на ней соответствующие элементы (Надпись и Кнопку).
2. Изменить свойство Caption у всех элементов формы: UserForm2.Caption=Задание 2; Label1.Caption=Линейный алгоритм; CommandButton1.Caption=Вычисление Т..
3. Составить программу вычисления для заданных значений X, Y, Z арифметического выражения

при x=14.26, y=-1.22, z=0.035

1. Вставить новую форму диалога и расположить на ней соответствующие элементы (Надпись и Кнопку).
2. Изменить свойство Caption у всех элементов формы: UserForm3.Caption=Задание 3; Label1.Caption=Разветвляющийся алгоритм; CommandButton1.Caption=Вычисление Y.
3. Написать программу для вычисления значения функции

1. Вставить новую форму диалога и расположить на ней соответствующие элементы (Надпись и Кнопку).
2. Изменить свойство Caption у всех элементов формы: UserForm4.Caption=Задание 4; Label1.Caption=Циклический алгоритм; CommandButton1.Caption=Вычисление суммы.
3. Написать программу для решения следующей задачи. Ввести с клавиатуры N чисел. Найти сумму тех из них, которые принадлежат интервалу (2;9).