Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
РАБ_ВЁ~1.doc
Скачиваний:
3
Добавлен:
08.11.2019
Размер:
1.24 Mб
Скачать

Задача 9

Составить отчётную ведомость по расчёту затрат на производство товара рис 9.

Предположим, что фирма производит CD-диски. Упаковка диска обходится фирме в 1 руб./шт, стоимость материалов – 4 руб./шт. Технические возможности фирмы позволяют выпускать до 5 тысяч дисков в день. Оплата труда рабочих является сдельной и зависит от количества выпущенных дисков. За первую тысячу дисков оплата труда рабочих составляет 0, 3 руб./шт., за вторую тысячу дисков – 0,4 руб./шт., за третью тысячу дисков – 0,5 руб./шт., за четвёртую тысячу дисков – 0,6 руб./шт. и свыше 4000 – 0,7 руб./шт.

Фирме поступил заказ на изготовление 4500 CD-дисков. Необходимо подсчитать суммарные издержки и прибыль от выполнения, данного заказа.

Рис 9.

Для упрощения чтения формул присвоим с помощью команды «Вставка» - «Имя» - «Присвоить» диапазонам F4:K4, F5:K5, F6:K6 и ячейке В3, соответственно, имена:

ДискиШт

ОплатаРубШт

ОплатаРуб

ЗаказШт

Зарплата рабочих, в зависимости от объёма выпущенных дисков, находится в диапазоне F6:K6 по формуле:

{=ЕСЛИ(ЗаказШт1000>ДискиШт;1000*ОплатаРубШт;ЕСЛИ(ЗаказШт>ДискиШт;(ЗаказШт-ДискиШт)*ОплатаРубШт;0))}

Заметим, что имя диапазона или ячейки удобнее вводить в формулу из диалогового окна «Вставка имени», которое открывается командой «Вставка» - «Имя» - «Вставить», что помогает избегать ошибок при вводе с клавиатуры.

Стоимость упаковки и материалов вычисляются в ячейках В8 и В9 по формулам:

=B5*ЗаказШт

=B6*ЗаказШт

Зарплата, общие издержки и прибыль вычисляются в ячейках В10, В11 и В12 по формулам

=СУММ(ОплатаРуб)

=СУММ(B8:C10)

=B4*ЗаказШт-B11

Расчёт прибыли и затрат на производство закончен.

Задача 10

Вычислить комиссионные по двум сценариям:

р1=4%, р2=3%, р3=2% и

р1=6%, р2=4%, р3=2%.

  • если объём продаж не менее 100 000 грн, то комиссионные равны р1 процентов от объёма продаж;

  • если объём продаж от 50 000 грн до 100 000 грн, то комиссионные равны р2 процентов от объёма продаж;

  • если объём продаж менее 50 000грн, то комиссионные равны р3 процентов от объёма продаж.

Рис 10.

В ячейку D4 заносим формулу:

=ЕСЛИ(C4>=100000;C4/100*4;ЕСЛИ(C4>=50000;C4/100*3;C4/100*2))

для первого сценария, и протягиваем маркер заполнения в диапазон ячеек D4:D11. Для второго сценария формула выглядит следующим образом:

=ЕСЛИ(C4>=100000;C4/100*6;ЕСЛИ(C4>=50000;C4/100*4;C4/100*2)).

Задача 11

Уличный продавец покупает журналы у издательства по цене 20 грн за штуку, а продаёт по – 23 грн за штуку. В случае, если товар не удаётся реализовать, продавец возвращает его издательству по цене 17 грн за штуку. Необходимо определить, сколько журналов следует закупать продавцу, чтобы его ожидаемая прибыль была максимальной, рис 11.

В ячейку С7 введена формула:

=C6/СУММ($C$6:$G$6), которая рассчитывает вероятность события. Затем протянем маркер заполнения в диапазон ячеек C7:G7 для расчета вероятности события в каждом случае.

В ячейках С11:G15 – финансовые исходы при всех возможных вариантах событий покупки журналов и их реализации.

Элементы главной диагонали матрицы и выше определяются по формуле:

=C10*($A$4-$D$4)

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

D12 - $D10(…), Е13 - $E10(…),

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

=(($A$4-$D$4)*$C$10)+(($D$4-$F$4)*($C$10-B12))

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

Рис 11.

В ячейках I11:I15 с помощью формулы

{=МУМНОЖ(C11:G15;ТРАНСП(C7:G7))}

находим ожидаемую прибыль, соответствующую различным вариантам покупки журналов.

В ячейке F16 (максимальная прибыль) с помощью формулы

=НАИБОЛЬШИЙ(I11:I15;1)

вычислим максимальную прибыль.

В ячейке F17 по формуле

=(ПОИСКПОЗ(НАИБОЛЬШИЙ(I11:I15;1);I11:I15;0)-1)*5)

вычисляем соответствующий оптимальный объём покупки газет.

Еще эту задачу можно решить следующим образом.

Уличный продавец покупает журналы у издательства по цене 20 руб. за штуку, а продает – по 23 руб. за штуку. В случае, если товар не удается реализовать, продавец возвращает его издательству по цене 17 руб. за штуку. Необходимо определить, сколько журналов следует закупать продавцу, чтобы его ожидаемая прибыль была максимальна.

Продавцу никогда не удавалось продать более 20 журналов, а в среднем за 37 дней объема реализации и число соответствующих событий показаны на рис.11.1. (для простоты учитываются только пачки по 5 журналов).

Рис.11.1

В ячейку F9 введена формула:

= F8/СУММ($F$8:$J$8),

вычисляющая вероятность события. Эту формулу протаскиваем за маркер заполнения на диапазон F9:J9. Стоимость продукции вводится в ячейки D6(продажа), Е6(покупка), F6(возврат) из диалоговых окон ввода (рис11.2.) с помощью процедуры Calc, назначенной кнопке ’’Ввод‘‘. Кроме того, процедура Calc выводит найденные значения максимальной прибыли и оптимального объема закупки газет в диалоговое окно, представленное на рис.11.2.

Рис.11.2.

Sub Calc()

Dim r, v As Double

Range("продажа").Value = _

InputBox("Введите стоимость продажи")

Range("Покупка").Value = _

InputBox("Введите стоимость покупки")

Range("Возврат").Value = _

InputBox("Введите стоимость возврата")

r = Range("максимальная_прибыль").Value

v = Range("оптимальный_объем").Value

r = Format(r, "#,##")

MsgBox "Максимальная прибыль:" & r & Chr(13) & _