Характеристика программы на языке VBA, которая вводит исходные данные, выполняет расчеты и вывод (стр. 1 из 2)

ФЕДЕРАЛЬНОЕ АГЕНСТВО ПО ОБРАЗОВАНИЮ

РОССИЙСКОЙ ФЕДЕРАЦИИ

ИДО ГОУ МГИУ

Курсовая работа

По дисциплине «Информатика»

Задание:№ 38

Группа: № П09Б22п

Студент: Булдыгина Н.В.

Руководитель: Иванов М.Н.

Москва 2010

Содержание

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

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

3. Блок схема. 6

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

5. Листинг программы.. 11

6. Описание входных данных и результат вычислений. 16

7. Список использованной литературы.. 19

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

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

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

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

· доход от каждого вида велосипеда за год;

· доход от всех велосипедов за каждый месяц;

· общий доход от всех велосипедов за год;

· наименование велосипеда, принесшего наибольший доход за год.

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

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

1) Количество велосипедов каждого из 10 типов, изготовленных за год (12 месяцев).

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

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

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

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

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

1) cena(10) — деньги, вырученные от продажи одного велосипеда,
представляет массив дробных чисел

Dim cena(10) As Double

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

Dim koll(10,12) As Integer

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

Dim zar(13) As Double

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

Dim kol_n(12) As Integer

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

Dim den As Integer

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

Dim i As Integer, j As Integer

Переменные cena(10), zar(13), могут быть и не целыми числами, поэтому они объявлены как действительные. Переменные koll(10,12) koll_n(12), den — целые числа, так как мы считаем, что расчетный период составляет полный месяц, и производители могут продать только полностью собранный велосипед.

3. Блок схема

Рис.3. Блок-схема (продолжение)

Рис.3. Блок-схема (продолжение)