Содержание
1. Задание на курсовую работу
2. Описание переменных
3. Блок схема
4. Описание алгоритма
5. Листинг программы
6. Описание входных данных и результат вычислений
Список использованной литературы
1. Задание на курсовую работу
В коллективном хозяйстве имеются цветочные оранжереи (розы, гвоздики, лилии - всего 6 видов цветов). Каждый год в течение 3 лет колхоз собирал букеты с каждой оранжереи и продавал их по закупочным ценам, которые были различны в разные годы.
Написать программу на языке VBA, которая вводит исходные данные, выполняет расчеты и выводит на экран:
- исходные данные в виде таблицы, где указаны наименования цветов, закупочные цены букетов каждого вида и количество букетов в каждом году;
- общее количество букетов за 3 года;
- доход по всем цветам за каждый год;
- общий доход колхоза за 3 года;
- вид цветов, принесший максимальный доход за 2 года.
2. Описание переменных
Исходные данные находятся на листе «Начальные данные» («Нач_д» (рис. 1) и содержат следующую информацию:
1) количество букетов из 6 видов, выращенных за год.
2) закупочные цены букетов каждого вида.
Результаты работы программы оформляются на листе «Результат» (рис. 2).
Рис.1. Лист с начальными данными
Рис.2. Полученные результаты
В программе переменные описаны следующим образом:
1) koll(7,5) — количество букетов за каждый год
Dim koll(7,5) As Integer
3) zar(6) — доход по всем цветам за каждый год
Dim zar(6) As Double
4) koll_n(7) — общее количество букетов за3 года
Dim kol_n(7) As Integer
5) vid — вид цветов принесший максимальный доход
Dim vid As Integer
6) zarpl — сумма максимального дохода
Dim zarpl As Double
7) cena(7) — общий доход колхоза за 3 года
Dim cena(7) As Double
В программе также были использованы вспомогательные переменные, счетчики циклов, i и j, являющиеся целыми числами.
Dim i As Integer, j As Integer
Переменные cena(7), zar(6), zarpl могут быть и не целыми числами, поэтому они объявлены как действительные. Переменные koll(7,5) koll_n(7) целые числа, так как мы считаем, что смена рабочего составляет полный день, и он не может изготовить за смену половину детали.
3. Блок схема
Рис.3. Блок-схема
Рис.3. Блок-схема (окончание)
4. Описание алгоритма
Начало программы.
Ввод начальных (нулевых) значений для расчетных величин (общее количество букетов за 3 года, доход по всем цветам за каждый год и доход по всем цветам за каждый год и общее количество букетов за 3 года, вид цветов, принесший максимальный доход за 2 года).
Открытие листа с начальными данными («Нач_д») и получение этих данных в рабочие переменные (массивы сеnа(7) и kоll(7, 5)).
Открытие листа с результатами, формирование матрицы входных данных. Организуется два вложенных цикла (доход по всем цветам за каждый год и общее количество букетов за 3 года). ............
