Содержание

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

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

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

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

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

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

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

 

 

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

 

В течение пяти дней (рабочая неделя) рабочий изготавливает детали семи различных типов. Известно количество изготовленных им деталей за каж­дый день и стоимость изготовления одной детали каждого типа (стоимость изготовления детали не меняется).

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

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

·        количество деталей каждого типа, изготовленных за неделю;

·        заработок за каждый день;

·        день с наибольшим заработком.

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

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

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

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

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

 

 

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

 

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

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

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

Dim cena(7) As Double

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

Dim koll(7,5) As Integer

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

Dim zar(6) As Double

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

Dim kol_n(7) As Integer

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

Dim den As Integer

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

Dim zarpl As Double

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

Dim i As Integer, j As Integer

Переменные cena(7), zar(6), zarpl могут быть и не целыми числами, поэто­му они объявлены как действительные. Переменные koll(7,5) koll_n(7), den — целые числа, так как мы считаем, что смена рабочего составляет полный день, и он не может изготовить за смену половину детали.

---

Нужен полный текст этой работы? Напиши заявку cendomzn@yandex.ru