Ознакомительная практика (Полетайкин). Вариант №04

Вариант No04

ЗАДАНИЕ 1.

1. В приложении А выбрать заданную таблицу. Номер варианта рас-считать как увеличенный на единицу остаток от деления цифровой части пароля на 30.
2. На листе «Лист1» при помощи инструмента Вид-Макросы записать макрос с сочетанием клавиш для вызова Ctrl+<Первая буква фами-лии>, выполняющий построение заданной таблицы с типовыми за-головками столбцов и строк, семью пустыми строками для данных и итоговой строкой. В ячейке итоговой строки, соответствующей ле-вому пустому столбцу, ввести формулу для расчета итоговых значе-ний по столбцу в соответствии с индивидуальным заданием (см. приложение А). Формулу распространить на все ячейки итоговой строки, соответствующим пустым столбцам. После этого остановить запись макроса.
3. Выполнить макрос на листе «Лист2» и убедиться в корректности его работы. При некорректной работе исправить текст макроса, либо за-писать макрос заново.
4. На листе «Лист1» в пустой ячейке данных создать формулу, запол-няющую данную ячейку случайным числом в заданном диапазоне (50 ... 900). Формулу распространить на все ячейки данных посред-ством автозаполнения.
5. Открыть редактор Visual Basic, создать новый модуль и написать в нем функцию для вычисления итогового значения по строке в соот-ветствии с индивидуальным заданием (см. приложение А). Количе-ство и имена аргументов функции определить самостоятельно на ос-нове формата таблицы.
6. В этом же модуле написать процедуру тестирования функции для вычисления итогового значения. Выполнить ее и убедиться в кор-ректности работы функции. При некорректном выполнении испра-вить функцию.
7. На листе «Лист2» в верхней ячейке итогового столбца создать фор-мулу для вычисления итогов по строке с использованием написан-ной в п.5 функции. Распространить формулу на другие ячейки ито-гового столбца посредством автозаполнения.

Вариант No 4
Изде-лие Себестои-мость Затраты, тыс. руб. Итог
  Матери-алы Энергия Зарплата 
Станок 32    
Функция для вычисления итоговых значений по столбцам: СУММ; формат числа: денежный.
Рассчитать разницу между суммарными затратами и себестоимостью по каждому изделию; формат числа: вещественный.

------------------------------------------------------------------------------

ЗАДАНИЕ 2.

  В приложении Б выбрать заданные функции преобразования. Номер варианта рассчитать как увеличенный на единицу остаток от деления цифровой части пароля на 30.

z=25x+37y

y={█(&e^x+sinx,приx>3.1@&〖cos〗^2( x)+sin( x),приx≤3.1)

 Создать новую книгу MS Excel и сохранить ее в совей рабочей папке под именем Расчет функций <Фамилия студента>.
 Разместить на листе «Лист 1» нем три ячейки для данных в соответствии с таблицей 2.3. Подписи к ячейкам разместить с левой стороны от ячейки.
X - B8; Y – B4; Z – E4; ПК – E8;

 Открыть редактор Visual Basic, создать новый модуль и написать в нем процедуру (Sub) EvalY() для вычисления функции преобразования F1. В теле процедуры объявить переменные x, y и z вещественного типа. Значения для переменных x и y считывать из ячеек в соответствии с индивидуальным заданием (см. табл. 2.3). Рассчитанное значение z также записывать в заданную ячейку.
 В этом же модуле написать процедуру EvalZ() с использованием структурного оператора ветвления для вычисления функции преобразования F2. Координаты ячеек для x и y такие же, как и при выполнении задания 4.
 Перейти в книгу MS Excel и добавить на лист два элемента управления «Переключатель» (Разработчик/Элементы управления/Вставить), подписи переключателей установить «Функция 1» и «Функция 2» (Контекстное меню Изменить текст), оба переключателя связать с ячейкой «ПК» (см. табл. 2.3) (Контекстное меню Формат объекта...).
 Добавить на лист элемент управления «Кнопка», для кнопки задать подпись «Расчет» и создать макрос для обработки события «Щелчок». В теле процедуры макроса написать код на VBA, который вызывает процедуру Eval_1() или Eval_2() в зависимости от положения переключателя (использовать структурный оператор ветвления, проверять значение ячейки «ПК», заданной в табл. 2.3).
 Задать значения x, y, установить переключатель в положение «Функция 1» и выполнить расчет, нажав на кнопку, результаты зафиксировать в отчете.
 Установить переключатель в положение «Функция 2» и выполнить расчеты при различных значениях аргумента x, результаты зафиксировать в отчете.
 Проверить адекватность результатов выполнения заданий 8 и 9 на контрольном примере.

------------------------------------------------------------------------------

ЗАДАНИЕ 3

 В приложении Б согласно номеру своего варианта выбрать заданную функцию преобразования 2. Номер варианта рассчитать как увеличенный на единицу остаток от деления цифровой части пароля на 30.

y=x^2-b/x+a) x[1; 1,5], x = 0,2

 Создать новую книгу MS Excel.
 При помощи редактора Visual Basic на основе процедуры Eval_2(), разработанной при выполнении заданий раздела No2, написать функцию F2(x As Single) As Single, которая возвращает значение функции от аргумента x.
 На листе 1 книги MS Excel в произвольном месте создать рабочие диапазоны, как показано на рис. 3.1. Для столбца, соответствующего ячейкам заголовка таблицы s задать формат ячеек «Числовой» с числом десятичных знаков: 5.

Рис. 3.1. Схема рабочих диапазонов на листе Excel, лист 1

 Создать на листе элемент управления «Кнопка» с надписью «Расчет», в обработчике события «Щелчок» написать код на VBA, который производит вычисления значений ряда a_n=(y(x))/n^5 и накапливает сумму s=∑_(n=1)^∞▒a_n и записывает результаты в таблицу на листе. Вычисления производить до тех пор, пока общий член ряда не окажется меньше заданной точности (a_n<ε). Четным номерам вариантов использовать цикл с предусловием, нечетным – с постусловием.
 Выйти из режима конструктора, задать точность и произвольное значение аргумента x. Нажатием на кнопку «Расчет» произвести расчет значений.
 Создать копию листа 2, провести аналогичные вычисления при помощи формул MS Excel, и убедиться в корректности работы макроса.
 Повторить вычисления для разных значений точности и аргумента, в том числе для таких, которые предполагают различные варианты расчета функции y(x). Зафиксировать результаты вычислений.
 На листе 2 книги MS Excel в произвольном месте создать рабочие диапазоны, как показано на рис. 3.2. Для столбцов, соответствующих ячейкам заголовка таблицы x и y , а также для ячеек параметров и шага, задать формат ячеек «Числовой» с числом десятичных знаков: 3.


Рис. 3.2. Схема рабочих диапазонов на листе Excel, лист 2

 Создать на листе элемент управления «Кнопка» с надписью «Расчет», в обработчике события «Щелчок» написать код на VBA, который производит вычисления значений функции y от аргумента x , изменяющегося с заданным шагом (выбрать из приложения В), и записывает результаты в таблицу на листе. Использовать параметрический цикл For ... Next.
 Выйти из режима конструктора, задать параметры функции и значение шага x. Нажатием на кнопку «Расчет» произвести расчет значений.
 По диапазону рассчитанных значений на листе 2 построить диаграмму типа График. На втором шаге на вкладке Ряд задать подпись ряда «Значения функции». На третьем шаге задать название диаграммы, легенду не отображать. На четвертом шаге диаграмму поместить на отдельном листе с подписью «График значений функции».
 Изменить фон области построения на белый, при необходимости скорректировать шкалу вертикальной оси, изменить цвета и толщину линий.
 Создать копию листа 2, провести аналогичные вычисления при помощи формул и встроенных функций MS Excel, и убедиться в корректности работы макроса.

=============================================

Оценка: Отлично
Дата оценки: 13.12.2023г.

Помогу с вашим вариантом, другой дисциплиной, онлайн-тестом, либо сессией под ключ.
E-mail: sneroy20@gmail.com
E-mail: ego178@mail.ru