Фабрика по производству обуви

Порядок и основные этапы разработки программы на языке VBA, которая вводит исходные данные, выполняет расчеты и выводит на экран данные. Требования к ее функциональности, внутренняя структура и компоненты. Описание переменных и алгоритма, листинг.

Рубрика Программирование, компьютеры и кибернетика
Вид контрольная работа
Язык русский
Дата добавления 23.02.2015
Размер файла 706,8 K

Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже

Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.

Размещено на http://www.allbest.ru/

Размещено на http://www.allbest.ru/

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

Фабрика по производству обуви в течение 5 месяцев выпускала обувь 3 типов (мужская, женская, детская). Цена устанавливалась в начале каждого месяца.

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

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

· количество проданной мужской обуви.

· минимальная цена женской обуви в первом месяце;

· доход, полученный за 5 месяцев за детскую обувь;

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

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

алгоритм программа переменная

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

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

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

1. Количество обуви, состоящее из трех типов (мужская, женская и детская), выпущенная в течение 5 месяцев.

2. Цена и количество за каждые месяцы.

Полученный результат программы оформлен на «листе 2» (рис. 2).

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

1 List M - мужская обувь.

2. List G - женская обувь.

3. List C - детская обувь.

4. Price (5) As long- 5 значений цены за каждый месяц.

5. Count (5) As integer- 5 значений количества проданной обуви.

6. Private Type TBoot - название типа записи.

7. Dim list M As Tboot-массив для хранения «мужской обуви».

8. Dim list G As Tboot - массив для хранения «женской обуви».

9. Dim list C As Tboot-массив для хранения «детской обуви»

10. Dim result As long - временная переменная, в которой записаны результаты расчетов и записи.

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

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

Находим номера строчек, между которыми находятся данные по каждому типу обуви (три типа обуви). Создаем пустые массивы и выполняем функцию GetData для каждого типа обуви (заполняем три массива). Присваиваем первой ячейке на втором листе значение «количество проданной мужской обуви». В двойном цикле по каждой записи мужской обуви (listM) и по каждому месяцу суммируем количество проданной обуви и выводим в ячейку рядом. Присваиваем второй ячейке на втором листе значение «минимальная цена женской обуви за первый месяц». Перебиваем в цикле по всей женской обуви (listG) цену за первый месяц и если значение оказалось меньше чем заданного, то присваиваем этому числу. Выводим в ячейку рядом. Присваиваем третей ячейке на втором листе значение «доход, полученный за 5 месяцев за детскую обувь». В двойном цикле по детской обуви (listC) и ее цене (Price) умноженное на количество (Count) суммируем произведения выводим в ячейку рядом. Присваиваем четвертой ячейке на втором листе значение «какая обувь имела наименьший доход за весь период». Двойным циклом по каждой записи по мужской обуви (listM) и по месяцам перемножаем сумму и количество и прибавляем свою переменную (Count).В конце первого цикла проверяем (Result)<(Count) если да то запоминаем в (Result) и получаем сумму. И так же по следующим типам обуви.

4. Листинг программ

Sub macros ()

(1)

IndexM=GetIndex («Женская обувь») - номер строки где есть слово «женская обувь»

EmptyIndexM=GetNext EmptyIndex (IndexM) - номер строки где заканчивается слово «женская обувь»

IndexG=GetIndex («Мужская обувь») - номер строки где есть слово «мужская обувь»

EmptyIndexG= GetNext EmptyIndex (IndexG) - номер строки где заканчивается слово «мужская обувь»

IndexC= GetIndex («Детская обувь») - номер строки где есть слово «детская обувь»

EmptyIndexС= GetNext EmptyIndex (IndexС) - номер строки где заканчивается слово «детская обувь»

(2)

Dim listM () As Tboot-массив для хранения данных по «Мужской обуви»

Dim listG () As Tboot - массив для хранения данных по «Женской обуви»

Dim listC () As Tboot - массив для хранения данных по «Детской обуви»

ListM=GetData (indexM+3, EmptyindexM-заполняем массив «Мужская обувь»

ListG=GetData (indexG+3, EmptyindexG-заполняем массив «Женская обувь»

ListC=GetData (indexC+3, EmptyindexC-заполняем массив «Детская обувь»

(3)

Sheets (2).Cells (1, 1) - количество проданной обуви

Dim result As Long - временная переменная в которой записывается результат подсчетов и записываем в ячейку второго столбца второго листа

For i=0 To UBoond (listM)

For j=1To 5

Result=result+listM (i). Count (j)

Next

Next

Sheets (2).Cells (1, 2) =result

(4)

Sheets (2).Ceells (2, 1) = «минимальная цена женской обуви в первый месяц»

Result=100000

For i=0 To UBoond (listG)

If (result>listG (i).Price (1)) Then

Result=listG (i).Price (1)

Next

Sheets (2).Cells (2, 2) =result

(5)

Sheets (2).Cells (3, 1) = «доход полученный за 5 месяцев за детскую обувь»

Result=0

For i=0 To UBoond (listС)

For j=1To 5

Result= result+listC (i).Count (j)*listC (j).Price (j)

Next

Next

Sheets (2).Ceells (3, 2) =result

(6)

Sheets (2).Ceells (4, 1) = «какая обувь имела наименьший доход за весь период»

Result=0

Dim str As String - записываем название обуви удовлетворяющее условию

Dim count As Long - временная переменная для записи дохода за весь период

For i=0 To UBoond (listС)

Count=0

For j=1To 5

Count=count+listC (i).Count (j)*listC (i).Price (j)

Next

If (result< count) Then

Result=count

Str=listC (i).Name

Next

For i=0 To UBoond (listM)

Count=0

For j=1To 5

Count=count+listM (i).Count (j)*listM (i).Price (j)

Next

For i=0 To UBoond (listG)

Count=0

For j=1To 5

Count=count+listG (i).Count (j)*listG (i).Price (j)

Next

If (result< count) Then

Result= count

STR=listG (i).Name

Next

Sheets (2).Ceells (4, 2) =result

End Sub

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

Проверка программы на всех единица:

Проверка произвольных данных.

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

1. Степанов А.Н. «Информатика: Учебник для Вузов» 6-из // - П.; Питер, 2010.

2. Мозговой М.В. «Занимательное программирование. Самоучитель» // - .изд. Питер-2003.

3. Бурнов В.А., Карпушкин Н.А, Овсянников В.М «Практические занятия по информатике» // изд. Образование и информатика-2001.

4. Малинина Л.А «Основы информатики: Учебник для вузов» // изд. Феникс -2006.

5. Пак. Н.И, Хенкер Е.К «Практикум по информатике. Учебное пособие для Вузов» // . изд. - Сфера - 2009.

6. Степанов А.Н «Информатика. Учебник для Вузов» // . изд. Питер - 2010.

7. Угринович Н.Д.» Информатика и информационные технологии. Учебник для 10-11 классов» // изд. Бином-2009.

8. «Основы информатики: Учебник для Вузов» // изд-во МГТУ им Н.Э. Баумана-2001.

9. Кузнецова О.С. «Краткий курс по информатике» // изд-во Окей-книга - 2011.

10. Агальцов В.П., Титов В.М «Информатика для экономистов» // изд-во Форум -2010.

Размещено на Allbest.ru

...

Подобные документы

  • Характеристика программы на языке VBA, которая вводит исходные данные, выполняет расчеты и выводит результаты на экран. Описание переменных в программе, ее блок-схема и алгоритм работы. Листинг программы. Описание входных данных и результат вычислений.

    курсовая работа [721,4 K], добавлен 10.11.2010

  • Программа на языке VBA, которая выводит исходные данные на экран и выполняет расчеты и предназначена для учета на складе мастерской индивидуального пошива. Описание переменных и алгоритма программы. Листинг программы, примеры произведенных расчетов.

    реферат [25,4 K], добавлен 10.12.2010

  • Разработка программы на языке VBA, которая вводит исходные данные, выполняет расчеты и выводит на экран заданную информацию. Типы блок-схем и их использование при написании программы. Описание входных данных и результат вычислений, листинг программы.

    курсовая работа [680,3 K], добавлен 03.08.2009

  • Разработка программы на языке VBA для управления деятельностью птицеводческой фермы, которая вводит исходные данные, выполняет расчеты и выводит на экран расчет данных по уходу за гусями и показатели оценки эффективности организации птицеводства.

    курсовая работа [1,8 M], добавлен 19.04.2011

  • Программа на языке VBA, которая вводит исходные данные, выполняет расчеты и выводит на экран. Лист с начальными данными. Ввод начальных (нулевых) значений для расчетных величин. Вспомогательные переменные, счетчики циклов. Формирование матрицы данных.

    курсовая работа [2,7 M], добавлен 01.12.2010

  • Написание программы, которая вводит исходные данные, выполняет расчет и выводит на экран. Использование вспомогательных переменных и счетчиков циклов в программе. Расчет сумм заработков по каждому виду одежды за день, количества изготовленных деталей.

    курсовая работа [2,4 M], добавлен 17.01.2015

  • Разработка программы на языке Pascal. Описание переменных. Действия, которые должна выполнить программа согласно выбранного алгоритма. Детализация графической части программы. Листинг и тестирование программы. Вывод массива данных на экран монитора.

    контрольная работа [360,4 K], добавлен 13.06.2012

  • Структура записей входного массива. Описание основных типов данных. Алгоритм программы: присвоение начальных значений переменных, чтение списка из файла, вывод данных на экран, выполнение обработки данных, сохранение списка в файл. Листинг программы.

    курсовая работа [325,2 K], добавлен 28.12.2012

  • Разработка программы, которая создает в отдельном потоке случайный массив целых чисел в заданном диапазоне и выводит на экран эти числа. Описание общего алгоритма, интерфейс программы. Методы решения и алгоритмы задач, реализуемых каждым потоком.

    курсовая работа [372,6 K], добавлен 17.04.2014

  • Общие сведения о программном средстве по моделированию работы электродвигателя, его функциональное назначение. Описание логической структуры программного обеспечения. Вызов программы modelDPR52, ее загрузка, входные и выходные данные. Листинг программы.

    курсовая работа [420,0 K], добавлен 28.05.2012

  • Исходные данные к проекту информационной системы "Протокол технического эксперимента", ее назначение. Описание программы, ее структурная схема. Описание алгоритма работы программы. Программные средства разработки. Методика испытания (тестирования).

    курсовая работа [806,6 K], добавлен 17.02.2016

  • Разработка программы игры в крестики-нолики. Примеры игровой ситуации на игровом поле. Описание входных и выходных данных, переменных и функций программы. Реализация алгоритма работы программы на языке C++. Текст программы и примеры ее выполнения.

    курсовая работа [352,8 K], добавлен 14.04.2011

  • Методика создания программы, которая выбирает лучшей результат и выводит его на экран с сообщением, что это лучшей результат. Анализ процедуры распознавания простых чисел. Алгоритм и текст программы, переписывающей компоненты файла в обратном порядке.

    курсовая работа [1022,7 K], добавлен 08.02.2010

  • Создание программы на языке программирования С#, которая проверяет наличие в матрице хотя бы одного столбца, содержащего положительный элемент, поиск его номера. Упорядочивание его элементов по возрастанию. Листинг программы и инструкция по работе с ней.

    курсовая работа [1,9 M], добавлен 28.05.2014

  • Методика и основные этапы разработки информационной системы туристического агентства, основные требования к ней. Внутренняя структура и элементы данной системы, принцип работы с ней и оценка функциональности. Описание таблиц разрабатываемой базы данных.

    контрольная работа [881,5 K], добавлен 08.06.2014

  • Математическая постановка задачи. Обоснование выбора средств разработки. Входные и выходные данные работы программы. Решение задачи теста для написания и отладки программы. Описание программных модулей. Разработка алгоритма, анализ полученных результатов.

    курсовая работа [2,2 M], добавлен 13.12.2015

  • Создание приложения, исполняющего трансляцию программы из языка Паскаль в язык Си: разработка алгоритма реализации задачи, описание необходимых констант, переменных, функций и операторов, представление листинга программы и распечатка результатов.

    курсовая работа [305,9 K], добавлен 03.07.2011

  • Описание и функциональное назначение программы по оптимизации функции, ее логическая структура и используемые технические средства. Практическое применение программы, вызов и загрузка, входные и выходные данные, выполнение контрольного примера и листинг.

    курсовая работа [337,4 K], добавлен 26.02.2012

  • Изучение категории типов данных, видов выражений и операций, работа на языке Си. Составление программы вычисления значения функции у(х) при произвольном значении х. Блок-схема алгоритма. Описание текста программы и рассмотрение контрольного примера.

    лабораторная работа [124,7 K], добавлен 09.01.2012

  • Программа для расчета полинома. Описание и схема алгоритма, распределение памяти под код программы, под данные и стек. Схема хранения операций ввода-вывода и их подключение. Изменения стека во время прогона программы. Листинг программы с комментариями.

    курсовая работа [59,0 K], добавлен 02.12.2009

Работы в архивах красиво оформлены согласно требованиям ВУЗов и содержат рисунки, диаграммы, формулы и т.д.
PPT, PPTX и PDF-файлы представлены только в архивах.
Рекомендуем скачать работу.