Оформление протокола лабораторной работы

1. Отчет оформить на рабочем листе 1.

2. В заголовке лабораторной работы записать ее номер и цель проведения.

3. Записать условия индивидуальных заданий и порядок выполнения.

4. На листе 1 записать результаты решения.

5. Записать проект в личную папку под именем Лаб. 5.

6. Подготовиться для ответа на контрольные вопросы при защите лабораторной работы.

Контрольные вопросы

1. Дайте определение разветвляющегося вычислительного процесса.

2. Когда применяются операторы безусловного и условного перехода?

3. Функционирование оператора безусловного перехода GOTO.

4. Определение метки, к которой передается управление.

5. Дайте определение простого логического выражения. Приведите пример.

6. Что является результатом решения логического выражения?

7. Объясните логические операции AND, OR, NOT.

8. Дайте определение сложного логического выражения. Приведите пример.

9. Работа однострочного IF с сокращенной и полной формой представления.

10. Работа многострочного IF с сокращенной формой представления.

11. Работа многострочного IF с полной формой представления

12. Для каких целей используется оператор CASE и как он функционирует?

13. Функционирование оператора CASE без конструкции else.

14. Какие данные можно использовать в качестве селектора?

15. Что означают записи: Case 1 to 5, Case Is > 10

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

Циклические программы в vba

Цель работы: освоение работы операторов организации циклов. Разработка проектов для решения задач по простым циклическим программам. При подготовке к работе изучить теоретический материал (с.26 – 29).

Задание для выполнения лабораторной работы состоит из трех задач.

Задача 1. Разработать проект для решения задач по простым циклическим программам с помощью оператора IF.

Задача 2. Разработать проект для решения задач по простым циклическим программам с помощью оператора FOR.

Задача 3. Разработать проект для вычисления суммы членов ряда. Условия задач выбираются из табл. Л6.1 (алгоритмы см. глава1, Рис.1.5, а,с.).

Таблица Л6.1 – Варианты к заданию 1

№ вар.	Вычисляемая функция	Организация цикла с операторами	Изменения аргумента вычисляемой функции
	из лаб. работы №	IF FOR	ХН	ХК	dХ
0	4	+ +	0	2.2	0.2
1	4	+ +	-1.8	0.4	0.2
2	4	+ +	-1.6	0.6	0.2
3	4	+ +	-1.4	0.8	0.2
4	4	+ +	-1.2	1	0.2
5	4	+ +	-1	1.2	0.2
6	4	+ +	-0.8	1.4	0.2
7	4	+ +	-0.6	1.6	0.2
8	4	+ +	-0.4	1.8	0.2
9	4	+ +	-0.2	2	0.2
10	4	+ +	0.2	2.4	0.2
11	4	+ +	0.4	2.6	0.2
12	4	+ +	0.6	2.8	0.2
13	4	+ +	0.8	3	0.2
14	4	+ +	1	3.2	0.2
15	4	+ +	-1	0.1	0.1
16	4	+ +	-0.9	0.2	0.1
17	4	+ +	-0.8	0.3	0.1
18	4	+ +	-0.7	0.4	0.1
19	4	+ +	-0.6	0.5	0.1
20	4	+ +	-0.5	0.6	0.1
21	4	+ +	-0.4	0.7	0.1
22	4	+ +	-0.3	0.8	0.1
23	4	+ +	-0.2	0.9	0.1
24	4	+ +	-0.1	1	0.1
25	4	+ +	0.1	1.2	0.1
26	4	+ +	0.2	1.3	0.1
27	4	+ +	0.3	1.4	0.1
28	4	+ +	0.4	1.5	0.1
29	4	+ +	0.5	1.6	0.1
30	4	+ +	0.6	1.7	0.1

Пример записи условия задачи 1 и 2 для нулевого варианта.

Составить проект для табулирования следующей функции (см. лабораторную работу №4, нулевой вариант)

Задача 1.при хн= 0; хк= 2.2; dx=0.2; t=2.65; a= 3 при использовании оператора IF для организации цикла.

Задача 2. при хн= 0 ; хк= 2.2; dx=0.2; t=2.65; a= 3 при использовании оператора цикла FOR....Next.

Задача 3. Разработать проект для вычисления суммы членов ряда с заданной точностью Е= 0.001 и число его членов, если задан общий член ряда an. Для вариантов общий член ряда представлен в табл. Л6.2 (алгоритм см. глава 1, рис. 1.6 , а также главу 6.3).

Таблица Л6.2 — Варианты для задания № 3

№ вар.	Общий член ряда	Оператор цикла	№ вар.	Общий член ряда	Оператор цикла
0		Do while…	16		Do while…
1		Do Until…	17		Do Until…
2		Do..loop while	18		Do..loop while
3		Do..loop Until	19		Do..loop Until
4		Do while…	20		Do while…
5		Do Until…	21		Do Until…
6		Do..loop while	22		Do..loop while
7		Do..loop Until	23		Do..loop Until
8		Do while…	24		Do while…
9		Do Until…	25		Do Until…
10		Do..loop while	26		Do..loop while
11		Do..loop Until	27		Do..loop Until
12		Do while…	28		Do while…
13		Do Until…	29		Do Until…
14		Do..loop while	30		Do..loop while
15		Do..loop Until

Интерфейс пользователя для трех задач представлен на рис. Л6.1. Ввод данных выполняется программно, с помощью операторов присваивания. Вывод задачи 1 и 2 выполняется в окно отладки Immediate Window, а задачи 3 в текстовое окно TextBox2. Свойства элементов представлены в табл. Л6.3. Результат работы проекта на рис. Л6.2.

Таблица Л6.3 — Таблица свойств элементов

Элемент (Объект )	Свойство	Значение свойства
Форма1	Caption	Циклическая программа
TextBox1	Text
TextBox2	Text
Кнопка 1	Caption	Запуск 1 задачи
Кнопка 2	Caption	Запуск 2 задачи
Кнопка 3	Caption	Запуск 3 задачи
Кнопка 4		Закрыть проект

Окно TextBox1 используется для подсказки, где расположен результат решения (в окне отладки Immediate Window).

Рис. Л6.1. Интерфейс

Рис. Л6.2. Выполнение проекта

Пример процедуры отклика кнопки 1 (1-й задачи нулевого варианта).

Private Sub CommandButton1_Click() ‘ Заголовок процедуры отклика

Dim x, y, xn, xk, dx As Single ‘ Описание вещественных переменных

Dim a As Integer ‘ Описание целых переменных

Const t = 2.65 ‘ Присвоение константе t вещественного числа 2.65

xn = 0 : xk= 2.2: dx= 0.2 ‘ Присвоение значения xn, xk, dx

a = 3 ‘ Присвоение значения a

x=xn

1: y = (3.5 + x) / (x + 1) – (2 ^ x + a) / Sin(x + 2) – t ‘ Вычисление У

Debug.Print "x= "; x, "y= "; y ‘ Вывод х, у в окно отладки Immediate Window

X=x+dx

If x<=xk then goto 1 ‘ Переход к метке 1 при истинности x<=xk

textBox1.text= “см. Immediate “