Реферат: Решение экономических задач с помощью VBA
2.3.5 Определение оптимальных капиталовложений
Создаём исходную таблицу и заполняем ее мат. ожиданиями прибылей в состветствии с условием.
|
Ф и л и а л ы |
|
||||
Млн. грв |
1 | 2 | 3 | 4 | 5 | 6 |
0 |
0 | 0 | 0 | 0 | 0 | 0 |
1 |
0,11 | 0,12 | 0,18 | 0,2 | 0,17 | 0,12 |
2 |
0,11 | 0,13 | 0,18 | 0,22 | 0,17 | 0,23 |
3 |
0,12 | 0,13 | 0,19 | 0,24 | 0,18 | 0,24 |
4 |
0,12 | 0,13 | 0,19 | 0,26 | 0,18 | 0,24 |
5 |
0,13 | 0,13 | 0,2 | 0,29 | 0,19 | 0,25 |
6 |
0,13 | 0,13 | 0,2 | 0,31 | 0,19 | 0,25 |
7 |
0,14 | 0,13 | 0,2 | 0,33 | 0,2 | 0,26 |
Для дальнейшего решения задачи, вводим следующие обозначения:
Пусть R(i,j) – прибыль получаемая от вложения i млн. грв. В j-тый филиал, где в соотв. С вариантом i от (0,7), а j от (0,6)
F(A,1,2) – оптимальное распределение средств, когда А млн. грв. вкладываются в 1,2 филиалы вместе
F(A,1,2,3) – оптимальное распределение средств, когда А млн. грв. вкладываются в 1,2,3 филиалы вместе
F(A,1,2,3,4) – оптимальное распределение средств, когда А млн. грв. вкладываются в 1,2,3,4 филиалы вместе.
F(A,1,2,3,4,5) – оптимальное распределение средств, когда А млн. грв. вкладываются в 1,2,3,4,5 филиалы вместе.
F(A,1,2,3,4,5,6) – оптимальное распределение средств, когда А млн. грв. вкладываются в 1,2,3,4,5 филиалы вместе.
Значения I при которых достигается максимум определяют оптимальные капиталовложения в филиалы.
Максимальные значения ожидаемых прибылей вычисляется в программе и заносится в ячейки H4:L11 и будет выглядеть следующим образом:
М а к с и м у м ы |
|
|
||
1 и 2 | 1,2 и 3 | 1,2,3 и 4 | 1,2,3,4 и 5 | 1,2,3,4,5 и 6 |
0 | 0 | 0 | 0 | 0 |
0,12 | 0,18 | 0,2 | 0,2 | 0,2 |
0,23 | 0,3 | 0,38 | 0,38 | 0,38 |
0,24 | 0,41 | 0,5 | 0,55 | 0,55 |
0,24 | 0,42 | 0,61 | 0,67 | 0,67 |
0,25 | 0,42 | 0,63 | 0,78 | 0,79 |
0,25 | 0,43 | 0,65 | 0,8 | 0,9 |
0,26 | 0,43 | 0,67 | 0,82 | 1,01 |
В программе переменной К – присваиваем значение равное обьему капиталовложений. В массив R с рабочего листа капиталовложения вводим ожидаемую прибыль , распределенную по филиалам.
В диапазон ячеек (B14:K22) выводится оптимальное распределение капиталовложений по филиалам. После вычислений можно увидеть что максимальныя ожидаемая прибыль составляет 1,01 млн. грв. , из таблицы видны следующие рез-ты:
6 филиал – 2 млн.
5 филиал – 1 млн.
4 филиал – 1 млн.
3 филиал – 1 млн.
2 филиал – 1 млн.
1 филиал – 1 млн.
Сама таблица выглядит следующим образом:
Ф и л и а л ы | ||||||||||
0 |
0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 | 0 |
1 |
0 | 1 | 0 | 1 | 0 | 1 | 1 | 0 | 1 | 0 |
2 |
1 | 1 | 1 | 1 | 1 | 1 | 2 | 0 | 2 | 0 |
3 |
1 | 2 | 2 | 1 | 2 | 1 | 2 | 1 | 3 | 0 |
4 |
1 | 3 | 3 | 1 | 3 | 1 | 3 | 1 | 3 | 1 |
5 |
3 | 2 | 2 | 3 | 3 | 2 | 4 | 1 | 4 | 1 |
6 |
3 | 3 | 3 | 3 | 3 | 3 | 5 | 1 | 4 | 2 |
7 |
5 | 2 | 2 | 5 | 3 | 4 | 6 | 1 | 5 | 2 |
Млн. грв. |
1 | 2 | 1,2 | 3 | 1,2,3 | 4 | 1,2,3 и 4 | 5 | 1,2,3,4 и 5 | 6 |
2.3.6 Задание на нахождение оптимального раскроя
Составляем таблицу в которой будут приведены остатки от раскроя на заказ при различных вариантах раскроя.
Например по условию в соответствии с вариантом стандартная длина раскроя равна 28 метров,
т.е. первый вариант раскроя будет сосотавлять 0 рулон дляной 4 м, 0 рулонов длиной 6м и 4 рулона длиной 9 м, рулонов длиной 11 м. не будет, что в сумме даст 27, следовательно отходы будут составлять 1 метр. Второй вариант когда 1 рулон по 6 м и два по 11 м, в этом случае остатков не будет и т.д. Всего получается 19 вариантов раскроя.
В программе это будет выглядеть таким образом:
l = 28
a1 = 4: a2 = 6
a3 = 9: a4 = 11
r = 4
m = Application.Min(a1, a2, a3, a4)
t = Application.Floor(l / m, 1)
For i1 = 0 To t
For i2 = 0 To t
For i3 = 0 To t
For i4 = 0 To t
s = 28 - a1 * i1 - a2 * i2 - a3 * i3 - a4 * i4
If s >= 0 And s < m Then
Cells(r, 1).Value = r - 3
Cells(r, 2).Value = i1
Cells(r, 3).Value = i2
Cells(r, 4).Value = i3
Cells(r, 5).Value = i4
Cells(r, 6).Value = s
r = r + 1
End If
Next i4
Next i3
Next i2
Next i1
На листе это будет выглядеть так:
Д л и н ы р у л о н о в н а з а к а з | |||||
Варианты | Остаток | ||||
раскройки | 4 | 6 | 9 | 11 | от расктоя |
1 | 0 | 0 | 3 | 0 |
1 |
2 | 0 | 1 | 0 | 2 |
0 |
3 | 0 | 1 | 1 | 1 |
2 |
4 | 0 | 3 | 1 | 0 |
1 |
5 | 1 | 0 | 0 | 2 |
2 |
6 | 1 | 1 | 2 | 0 |
0 |
7 | 1 | 2 | 0 | 1 |
1 |
8 | 1 | 2 | 1 | 0 |
3 |
9 | 1 | 4 | 0 | 0 |
0 |
10 | 2 | 0 | 1 | 1 |
0 |
11 | 2 | 0 | 2 | 0 |
2 |
12 | 2 | 1 | 0 | 1 |
3 |
13 | 2 | 3 | 0 | 0 |
2 |
14 | 3 | 1 | 1 | 0 |
1 |
15 | 4 | 0 | 0 | 1 |
1 |
16 | 4 | 0 | 1 | 0 |
3 |
17 | 4 | 2 | 0 | 0 |
0 |
18 | 5 | 1 | 0 | 0 |
2 |
19 | 7 | 0 | 0 | 0 |
0 |