Примеры выполнения заданий КР-VBA. Определить
 Скачать 470.61 Kb.
|
|
Примеры КР 1 ПРИМЕРЫ ВЫПОЛНЕНИЯ ЗАДАНИЙ КР. ЛИНЕЙНЫЕ ВЫЧИСЛИТЕЛЬНЫЕ ПРОЦЕССЫ В линейных вычислительных процессах инструкции записываются последовательно друг за другом и выполняются только один раз. Программа обычно содержит операторы ввода данных, расчета значений и вывода полученных результатов. Пример Составить ГСА и вычислить значение функции R для задания из табл. Таблица Задание для примера 1 Условие задачи Исходные данные Промежуточные значения и результат R Определить R – среднее геометрическое чисел А, В, С k h x k A 2 3x sin e ; ; 2 arctg 3 3 x B 3 - 2 7 lg h x C x = 0,45 k = 16,7 h = 0,23 A = 0,43 B = 1,28 C = 3,73 R = 1,27 ГСА решения примера 1 с описанием выполняемых действий приведена на рис. 1 . В соответствии с ГСА составим программу расчета. Для освоения различных способов ввода в программе зададим значение x константой, остальные исходные данные введем разными способами одну переменную – с помощью функции InputBox, другую – с листа Excel (с помощью функции Cells). Вывод информации также выполним разными способами 1) на листе Excel в отдельных ячейках – промежуточные значения, рассчитанные по заданным формулам (начиная со строки 10); 2) в диалоговом окне – результат вычисления R; 3) в окне отладки Immediate – в трех отдельных строках исходные данные, промежуточные значения и результат R. 4) выделим одну любую ячейку с поясняющим текстом шрифтом красного цвета RGB(200, 0, 0), а любую ячейку с промежуточным значением – заливкой зеленым цветом RGB(0, 200, 0). 1 Соответствующий теоретический материал подробно представлен в конспекте лекций Основы программирования на VBA». Примеры КР 2 Листинг программы решения примера 1 с подробными комментариями приведен на рис. 2 , результат ее работы – на рис. 3 ирис. Сравнение полученных результатов с указанными в задании контрольными значениями позволяет сделать вывод о том, что задача решена верно. Рис. 1. ГСА решения примера 1 Примеры КР 3 Рис. Листинг программы решения примера 1 Примеры КР 4 Рис. 3. Результат решения примера 1 на листе Excel Рис. 4. Результат решения примера 1 в окне отладки Примеры КР 5 2. РАЗВЕТВЛЯЮЩИЕСЯ ВЫЧИСЛИТЕЛЬНЫЕ ПРОЦЕССЫ Разветвляющийся вычислительный процесс содержит хотя бы одну проверку условия, в результате которой обеспечивается выбор одного из двух возможных путей (ветвей) решения. После реализации любого выбранного варианта осуществляется переход к общему выходу. Рассмотрим разветвление натри ветви. Пример Вычислить значение функции z при указанном пользователем значении аргументах для задания из табл. Таблица Задание для примера 2 Функция Исходные данные Контрольные значения 2 , tg 2 1 , 1 , 32 2 x a x x e x ax z ax a = 3,5 При х = 0 при х = 1,7 при х = 3,6 z = 32,00; z = 383,75; z = 1,06 Несмотря на то, что в примере имеются три логических условия проверки переменной х, при составлении алгоритма достаточно организовать проверку только двух условий. Проверка условия в третьей ветви ненужна, поскольку условие хи так является единственно возможным при невыполнении первых двух условий. Кроме того, проверка двойного условиях является излишней, т. к. если условие первой ветви хне выполняется, это значит, что x ≥ 1, и тогда в сложном условии второй ветви 1 ≤ х ≤ 2 достаточно проверить только выполнение условиях. ГСА решения примера 2 с описанием выполняемых действий приведена на рис. 5 . В соответствии с ГСА составим программу расчета, в которой организуем ввод значения переменной х с помощью функции InputBox, а вывод значения x и соответствующего ему значения z – в диалоговое окно в виде При х = …, ветвь …, z = …». Листинг программы решения примера 2 с подробными комментариями приведен на рис. 6 , результат ее работы – на рис. 7 . Сравнение полученных результатов с указанными в задании контрольными значениями позволяет сделать вывод о том, что задача решена верно. Примеры КР 6 Рис. 5 . ГСА решения примера 2 Примеры КР 7 Рис. 6 . Листинг программы решения примера 2 а б Рис. 7 . Результат решения примера 2: в диалоговом окне (а в окне отладки (б) Примеры КР 8 3. ЦИКЛИЧЕСКИЕ ВЫЧИСЛИТЕЛЬНЫЕ ПРОЦЕССЫ Примером циклического расчета является табулирование функции – определение значений функции при изменении ее аргумента от начального до конечного значения с определенным шагом (приращением. Пример Составить ГСА и программу табулирования функции с использованием оператора арифметического цикла по заданию из табл. По результатам расчета построить график функции. Таблица Задание для примера 3 Функция Исходные данные Диапазон и шаг изменения аргумента Контрольные значения a x x y sin 2 a = 1,7 –2 ≤ x ≤ 1 ∆x = 0,3 При x = –2,0 y = 3,70; при x = –0,2 y = 1,04; при x = 1,0 y = 1,43 ГСА решения примера 3 с описанием выполняемых действий приведена на рис. 8 . Параметром цикла является аргумент функции x. Заголовок цикла определяет перебор значений этой переменной в заданном диапазоне (от –2 до 1) с шагом 0,3. Рис. 8 . ГСА решения примера 3 Примеры КР 9 В соответствии с ГСА составим программу расчета, в которой организуем вывод значений аргумента x и соответствующих им значений функции y на лист Excel в два столбца, например, начиная со строки 10. Для наглядного представления и контроля полученных результатов выделим последнее значение заливкой зеленым цветом RGB(0, 200, 0), последнее значение y – шрифтом красного цвета RGB(200, 0, 0). При обработке дробных чисел может накапливаться погрешность вычислений, которая приводит к тому, что цикл завершится до достижения последнего значения параметра цикла. Для исключения такой ситуации рекомендуется увеличить конечное значение параметра цикла, например, на десятую долю шага, те. вместо кон принимать значение кон + Δx/10. Поэтому в программе решения примера 3 в заголовке цикла вместо заданного конечного значения x, равного 1, принято значение 1,03. Листинг программы решения примера 3 с подробными комментариями приведен на рис. 9 , результат ее работы – на рис. 10 . Сравнение полученных результатов с указанными в задании контрольными значениями позволяет сделать вывод о том, что задача решена верно. По результатам расчета на свободном месте листа построим средствами Excel точечную диаграмму (график) функции (см. рис. 10 ). В заголовке диаграммы следует указать свою фамилию, инициалы и шифр. Примеры КР 10 Рис. 9 . Листинг программы решения примера 3 Рис. 10 . Результат решения примера 3 |