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

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



Магазин «Виртуальный мир» продал за 1 месяц (3 декады)некоторое количество компьютеров различных типов (6 типов). Цены на компьютеры устанавливались в начале каждой декады.

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

• исходные данные в виде таблицы, где перечислены типы компьютеров и цены на них, количество проданных компьютеров в течение каждой декады;

• Доход от каждого компьютера за месяц;

• Доход от всех компьютеров за каждую декаду;

• Общий доход от продажи за месяц;

• тип компьютера, принесшего наибольший доход в месяц.



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



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

• типы компьютеров;

• цены на них;

• количество проданных компьютеров в течение каждой декады;



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

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

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

1) cena(7, 3) – Цена компьютера, представляет массив дробных чисел

Dim cena(7, 3) As Double

2) koll(7, 4) – Количество проданных компьютеров, представляет массив целых чисел

Dim koll(7, 4) As Integer

3) doh(7, 4) – Доход от продажи компьютеров, представляет массив дробных чисел

Dim doh(7, 4) As Double

4) maxdoh – сумма максимального дохода, представляет дробное число

Dim maxdoh As Double

5) maxtype – тип компьютера, принесшего максимальный доход, представляет текстовое значение

Dim maxtype As String

6) i,j – Счетчики циклов, представляют целые числа.

Dim i As Integer

Dim j As Integer





Рис. 2 Лист с примером решения.

Переменные количества заданы целыми числами, т.к. мы считаем что невозможно продать часть компьютера.





Блок-схема.



Блоки используются для обозначения действий, которые производит алгоритм, представленный блок-схемой.





Описание алгоритма.



Начало программы.

Ввод начальных (нулевых) значений для расчетных величин.

Открытие листа с...

Литература



1. Уокенбах, Джон, Андердал, Брайн. Excel 2002. Библия пользователя. : Пер. с англ. – М. : Издательский дом «Вильямс», 2002. - 832 с.

2. Уокенбах, Джон. Подробное руководство по созданию формул в Excel 2002.: Пер. с англ. – М. : Издательский дом «Вильямс», 2002. - 624 с.

3. Пол Санна и др. Visual Basic для приложений (версия 5) в подлиннике: пер. с англ. – СПб.: BHV – Санкт-Петербург, 1997. – 704 с.

4. Гарнаев А.Ю. Самоучитель VBA. - СПб.: БХВ - Санкт-Петербург, 1999. - 512 с.

5. Гарнаев А.Ю. Использование MS Excel и VBA в экономике и финансах. – СПб.: BHV – Санкт-Петербург, 1999. – 336 с.