Лабораторная работа №6
.docx,группа 476,мпециальность 190623(э)
Лабораторная работа № 6
6.1 Тема: Программная реализация несложного алгоритма (разветвляющаяся структура)
6.2 Цель: закрепить навыки создания разветвляющихся программ и научиться составлять более сложные программы с использованием операторов условного и безусловного перехода.
6.3 Содержание работы:
Пример 1.
Составим программный код вычисления значений функции:
1. Модуль 1.
Ввод данных с помощью оператора присваивания, вывод значений выражений – в диалоговом окне с помощью оператора MsgBox;
2. Модуль 2.
Ввод данных оператором InputBox, вывод – на рабочий лист Excel;
6.3.1 Запустить редактор VBAв приложении MSExcel;
6.3.2 Создать модуль VBAпри помощи команды Insert(Вставка)->Module(Модуль).
6.3.3 Для создания процедуры в верхней строке окна кода необходимо написать ключевое слово Sub и задать имя модуля Zadacha. При нажатии клавиши Enter редактор VBA автоматически вставит строку- разделитель и допишет оператор EndSub.Между Subи EndSubбудут записываться операторы программного модуля Module 1.
6.3.4 Для объявления простых переменных использую оператор Dim, определив x, yтип данных Single( числовые значения с плавающей точкой обычной точности).
6.3.5 Предварительно задаем исходное значение переменной x, используя оператор присваивания Let:
6.3.6 Согласно поставленной задачи, определение значения функции зависит от выполнения того или иного условия: IFусловие THEN
Блок программных операторов,
Выполняемых при соблюдении
условия
ELSE
Блок программных операторов,
Выполняемых при несоблюдении
условия
ENDIF
6.3.7 Вывод результата вычисления функции yпроизведем с помощью функции MsgBox, обеспечивающей вывод данных в диалоговое окно:
6.3.8 Запускаем на выполнение программный модуль редактора VBA. Результат выполнения модуля:
6.3.9 Создать новый модуль VBA при помощи команды insert (Вставка) ->Module(Модуль). Создать процедуру , написав ключевое слово SUB и задав имя модуля Zadachal.При нажатии клавишиEnter редактор VBA автоматически вставит строку- разделитель и допишет оператор EndSub. Между SubиEndSub будут записываться операторы программного модуля Module 2.
6.3.10 Для объявления просты переменных используем оператор Dim, определив для переменных x, yтип данных Single (числовые значения с плавающей точкой точкой обычно точности).
6.3.11 Исходные данные получим с использованием стандартной функции InputBox, отображающей диалоговое окно ввода значений переменной ч (по умолчанию переменной x присвоено значение ноль, поочередно ввести значения переменной в соответствии с выполнением условий)
6.3.12 Формируем условный оператор: IFусловие THEN
Блок программных операторов,
Выполняемых при соблюдении условия
ELSE
Блок программных операторов,
Выполняемых при несоблюдении условия
ENDIF
6.3.13 Ввод-вывод данных на лист рабочей книги Excel выполняем с помощью оператора Cells().
Синтаксис записи оператора: Cells(i,j) = Имя переменной,
где i,j – соответственно номер строки и столбца ячейки листа рабочей книги Excel.
6.3.14 Запускаем на выполнение программный модуль редактора VBA(клавиша <F5>или выполнить команду меню Run-> Run Sub0.
6.3.15 Используя образец, составить программный код вычисления значения функции:
А)
6.4 Вывод: закрепил навыки создания разветвляющихся программ и научился составлять более сложные программы с использованием операторов условного и безусловного перехода.
6.5 Контрольные вопросы:
-
Какая программа называется разветвляющейся?
Это значит программа имеет выбор последовательности действий в зависимости от каких-либо условий.
-
Для чего предназначен оператор IF…THEN…ELSE в Qbasic?
IF это означает «если» то, то, то, THEN означает «тогда» то, то, то ELSE означает «иначе» то, то, то.
3. Для чего предназначен оператор GOTO в Qbasic?
GOTO – перейти в какой то пункт программы.
4. Для чего предназначен оператор INPUT в Qbasic?
INPUT – вставить, выделить что-то.
-
Какие данные являются исходными для задачи?
Стр.