Описание переменных. Задание на курсовую работу

Задание на курсовую работу

Магазин игрушек продал за 15 месяцев количество радиоуправляемых машинок (10 наименований) по цене, устанавливаемой в начале каждого месяца (Каждый месяц цены на машинки менялись).

Написать программу на языке VBA, которая вводит исходные данные, выполняет расчеты и выводит на экран:

· Исходные данные в виде таблицы, где указаны наименования радиоуправляемых машинок, цена машинок в каждом месяце, количество проданных машинок в течение каждого месяца;

· Доход по каждой машинке за первые 2 месяца;

· Доход за каждый месяц по всем машинкам;

· Общий доход по всем машинкам за 13 месяцев;

· Наименование машинки, принесшей наибольший доход в последнем месяце

Описание переменных

Исходные данные находятся на листе «Нач_д» (рис. 1) и содержат сле­дующую информацию:

1) Количество деталей каждого из 7 типов, изготовленных за пять ра­бочих дней.

2) Стоимость изготовления одной детали каждого типа.

Результаты работы программы оформляются на листе «Результат» (рис. 2).

Рис.1. Лист с начальными данными

Рис.2. Полученные результаты

Рис.3.Результаты по доходам каждой машинки за первые 2 месяца

В программе переменные описаны следующим образом:

1) cena(14) — стоимость одной машинки каждого вида
представляет массив дробных чисел

Dim cena(14) As Double

2) koll(10,16) — количество машинок каждого вида, проданных в каж­дый из месяцев, представляет двумерный массив целых чисел

Dim koll(10,16) As Integer

3) zar(16) — заработок за каждый месяц (от 1 до 15) и общий заработок за весь период представляет массив дробных чисел

Dim zar(16) As Double

4) koll_n(10) — количество машинок каждого вида за истекший период представляет массив целых чисел

Dim koll_n(10) As Integer

5) mes — порядковый номер месяца с наибольшим заработком представляет целое число

Dim mes As Integer

6) zarpl — сумма наибольшего заработка за период представляет дроб­ное число

Dim zarpl As Double

7) zar2(13) — заработок за 13 месяцев из 15 (от 1 до 13) и общий заработок за 13 месячный период представляет массив дробных чисел

Dim zar2(13) As Double

8) doh- доход по каждой машинке за первые 2 месяца представляет дробное число

Dim doh As Double

В программе также были использованы вспомогательные переменные, счетчики циклов, i и j, являющиеся целыми числами.

Dim i As Integer, j As Integer

Переменные cena(14), zar(16), zar2(13), zarpl, doh могут быть и не целыми числами, поэто­му они объявлены как действительные. Переменные koll(10,16) koll_n(10), mes — целые числа, так как мы берёт в расчёт полноценные месячные промежутки, в течение которых на протяжение всего времени осуществлялись продажи машинок.

3. Блок схема (Вывод таблицы «Результат»)

Блок схема (Вывод таблицы «Результат»). Окончание