|
Частка змінних
витрат
|
β
|
грн
|
2
Алгоритм розрахунку моделі зведемо в таблицю 2.
модель програма код excel
Таблиця 2
Вихідні дані
Найменування
|
Позна-чення
|
Од.виміру
|
Формули
|
Розрахунки
|
Виробнича
потужність ОВФ
|
F
|
од.вироб.
|
F= q*f
|
500
|
Змінні витрати
|
Rс змін.
|
од.рес./грн
|
Rс змін.= F *∑ri*ci
|
6000
|
Постійні витрати,
|
Rс пост.
|
грн./од.рес.
|
Rс пост=Rc змін. * α+Am
|
12750
|
|
|
|
(де Аm=В*n)
|
|
Спільні ресурси
|
Rс
|
грн./од.рес.
|
Rc= Rс змін.+ Rс
ппост.
|
18750
|
Виручка від
реалізації
|
Qc
|
грн.
|
Qc= f*q*cпрод
|
12500
|
продукції
|
|
|
|
|
Прибуток
|
PR
|
грн.
|
PR=Rc-Qc
|
6250
|
Рентабельність
|
Ren.
|
|
Ren.=Rc/Qc
|
1,5
|
4. Побудування моделі рішення за допомогою «С++»
5. Програма на С + + (код програми).
Блок-схема програми:
ПРОГРАМА
Відкриваємо Visual Studio - Створити проект (New Project) -
Win 32 Console Application - Next - у вікні Application Wizard - Поставити
галочку в Console Application та Precompiled Header - Finish
Виконуємо наступні дії:
• введення вихідних даних (заповнення масиву з клавіатури);
• розрахунок показників;
• виведення їх на екран (виведення в циклі на екран і
виведення у вигляді таблиці).
// Laba_1.cpp: определяет точку входа для
консольного приложения.
//
#include "stdafx.h"
#include "iostream"namespace
std;_tmain(int argc, _TCHAR* argv[])
{("COLOR F0"); // белый фон,
русский язык(LC_ALL, "Russian"); // русский шрифтconst nn = 2, oo =
6, ii = 8; // nn константа и будет иметь неизменное значение 2 и оо = 6c_res[nn],
r_res[nn], dan[oo], itog[ii], q, f, b, Q_p, Q_n, C_prod, n, A, B, sum = 0, F,
Rc_zmin, Rc_post, Rc, Qc, PR, Ren, Am; // Объевление цыкла c_res[nn]-где пn
константа и будет иметь неизменное значение 2 т.е.
//значение c_res[nn] будет заполнятся 2 раза,
так-же и r_res[nn]<< "Контрольная Работа 1" << endl; //
вывод на экран Контрольная Работа 1<< "Введите входные
показатели" << endl; // Аналогично<< "введите
Продуктивность пр-ва. показатель q ="; // вывод на экран введите первый
показатель = и ожидание ввода с клавиатуры числа и только числа (ввести букву
можно тоже но решения не будет), а затем нажати Enter>> q; // Запись
значения введеного с клавиатуры числа в q<< " введите Количество
фондов показатель f ="; // вывод на экран введите второй показатель = и
ожидание ввода с клавиатуры числа и только числа (ввести букву можно тоже но
решения не будет), а затем нажати Enter>> f; // Запись значения введеного
с клавиатуры числа в f<< " введите Балансовая стоимость единици
фондов показатель b ="; // вывод на экран введите третий показатель = и
ожидание ввода с клавиатуры числа и только числа (ввести букву можно тоже но
решения не будет), а затем нажати Enter>> b; // Запись значения введеного
с клавиатуры числа в b<< endl;<< "Введите входные показатели
где:" << endl;<< " [1]- Цена на ресурсы материальные
" << endl;<< " [2]- Цена на ресурсы трудовые"
<< endl;(int i = 0; i < nn; i++)
{<< "[" << i + 1
<< "]" << ": ";>> c_res[i];
}<< " [3]- Нормы затрат ресурсов
материальнх " << endl;<< " [4]- Нормы затрат ресурсов трудовых
" << endl;(int i = 0; i < nn; i++)
{<< "[" << i + 3
<< "]" << ": ";>> r_res[i];
}<< " [5]- План продукции =
" ;>> Q_p;[0] = Q_p;<< " [6]- Спрос продукции = "
;>> Q_n;[1] = Q_n;<< " [7]- Цена продукции = " ;>>
C_prod;[2] = C_prod;<< " [8]- Норма амортизации = " ;>>
n;[3] = n;<< " [9]- Доля постоянных затрат в переменных затратах =
" ;>> A;[4] = A;<< "[10]- Доля переменных затрат = "
;>> B;[5] = B;<< endl;<< "------------------------------------------------------------------"
<< endl;<< "------------------------------------------------------------------"
<< endl;<< "! Переменные ! Значения !" <<
endl;<<
"------------------------------------------------------------------"
<< endl;<< "!Продуктивность пр-ва. показатель " <<
" ! " << q << " !" << endl;<< "!Количество
фондов " << " ! " << f << " !"
<< endl;<< "!Балансовая стоимость единиц фондов "
<< " ! " << b << " !" <<
endl;<< "------------------------------------------------------------------"
<< endl;(int i = 0; i < nn; ++i)
{<< "! А" << i + 1
<< " ! " << c_res[i] << " ! " <<
endl;<<
"------------------------------------------------------------------"
<< endl;
}(int i = 0; i < nn; ++i)
{<< "! А" << i + 3
<< " ! " << r_res[i] << " ! " <<
endl;<< "------------------------------------------------------------------"
<< endl;
}(int i = 0; i < oo; ++i)
{<< "! А" << i + 5
<< " ! " << dan[i] << " ! " <<
endl;<<
"------------------------------------------------------------------"
<< endl;
{= sum + c_res[i] * r_res[i];
}= q*f;[0] = F;_zmin = F * sum;[1] =
Rc_zmin;= b*n;_post = Rc_zmin * A + Am;[2] = Rc_post;= Rc_zmin + Rc_post;[3] =
Rc;= f * q * C_prod;[4] = Qc;= Rc - Qc;[5] = PR;= Rc / Qc;[6] = Ren;[7] =
Am;<<
"------------------------------------------------------------------"
<< endl;<<
"------------------------------------------------------------------"
<< endl;<< "выходные данные показатели" <<
endl;<< " [1]- Производственная мощность ОПФ " << endl;<<
" [2]- Переменные затраты " << endl;<< " [3]-
Постоянные расходы " << endl;<< " [4]- Совместные ресурсы
" << endl;<< " [5]- Выручка от реализации продукции
" << endl;<< " [6]- Прибыль " << endl;<<
" [7]- Рентабельность " << endl;<< " [8]-
Амортизація " << endl;<<
"------------------------------------------------------------------"
<< endl;(int i = 0; i < ii; ++i)
{<< "! А" << i + 1
<< " ! " << itog[i] << " ! " <<
endl;<<
"------------------------------------------------------------------"
<< endl;
}("PAUSE");0;
}
Контрольна робота № 2
. Постановка задачи:
Розглянемо підприємство, яке випускає продукцію на протязі
5-го періоду часу (5 років). Умовно припустимо, що розглядаються фонди тільки
одного виду.
Знайти оптимальну програму функціонування підприємства за
5-ий період часу (5 років) з урахуванням спільного використання ресурсів і
фондів.
. Формалізація моделі виробничої діяльності
підприємства (вхідні дані)
Основні показники, які описують підприємство, надані в табл.
1
Таблиця 1. Вхідні дані
|
Вихідні дані
|
|
|
|
|
|
|
Найменування
показників
|
ум. поз.
|
Значення за період
часу
|
|
|
|
n
|
n+1
|
n+2
|
n+3
|
n+4
|
Фонди
|
Кількість фондів
|
f
|
20
|
20
|
20
|
20
|
20
|
|
Балансова вартість
одиниці фондів
|
B
|
2 500
|
2 500
|
2 500
|
2 500
|
2 500
|
|
Продуктивність
(виробництво)
|
q
|
12,5
|
12,5
|
12,5
|
12,5
|
12,5
|
Ресурси
|
Ціна на ресурси:
|
срес i
|
5
|
5
|
5
|
5
|
5
|
|
матеріальні
|
|
|
|
|
|
|
|
трудові
|
|
|
|
|
|
|
|
Норми витрат
ресурсів:
|
r i
|
2
|
2
|
2
|
2
|
2
|
|
матеріальних
|
|
|
|
|
|
|
|
трудових
|
|
|
|
|
|
|
Продукція
|
план
|
Qр
|
400
|
400
|
400
|
400
|
|
попит
|
Qп
|
325
|
325
|
325
|
325
|
325
|
|
ціна
|
c прод
|
18
|
18
|
18
|
18
|
18
|
Змінні
|
Норма амортізації
|
n
|
0,3
|
0,3
|
0,3
|
0,3
|
0,3
|
|
Інтенсивне
використання технологій
|
γ
|
0,27
|
0,28
|
0,29
|
0,3
|
0,31
|
|
Частка постійних
витрат в змінних витратах
|
α
|
0,1
|
0,1
|
0,1
|
0,1
|
0,1
|
|
Частка змінних
витрат
|
β
|
0,05
|
0,05
|
0,05
|
0,05
|
0,05
|
|
|
|
|
|
|
|
|
|
|
|
|
. Рішення задачі в EXCEL:
Алгоритм розрахунку моделі зведемо в таблицю 2.
Таблиця 2. Вихідні дані
Вихідні дані
|
|
|
|
|
|
|
|
|
Найменування
|
поз.
|
Од. Вимір.
|
Формули
|
розрахунки за
період часу
|
|
|
|
|
n
|
n+1
|
n+2
|
n+3
|
n+4
|
Виробнича
потужність ОВФ
|
F
|
од.вироб.
|
F= q*f*
γ
|
67,5
|
70
|
73
|
75
|
78
|
Змінні витрати
|
Rс змін.
|
од.рес./грн
|
Rс змін.= F *∑ri*ci
|
700
|
725
|
750
|
775
|
Амортизація
|
Rс пост.
|
грн./од.рес.
|
Rс пост=Rc змін.* α+Am (де Аm=В*n)
|
818
|
820
|
823
|
825
|
828
|
|
|
|
|
|
|
|
|
|
Спільні ресурси
|
Rс
|
грн./од.рес.
|
Rc= Rс змін.+ Rс
пост
|
1 493
|
1 520
|
1 548
|
1 575
|
1 603
|
Виручка від
реалізації продукції
|
Qc
|
грн.
|
Qc= F *c прод
|
1 215
|
1 260
|
1 305
|
1 350
|
1 395
|
|
|
|
|
|
|
|
|
|
Прибуток
|
PR
|
грн.
|
PR= Rc-Qc
|
278
|
260
|
243
|
225
|
208
|
Рентабельність
|
Ren.
|
|
Ren.=Rc/Qc
|
1,23
|
1,21
|
1,18
|
1,16
|
1,15
|
. Програма на С + + (код програми).
#include "stdafx.h"
#include "stdafx.h"
#include "iostream"
#include "stdlib.h"namespace std;_tmain(int argc,
_TCHAR* argv[])
{("mode con cols=120 lines=80");("COLOR
F0");(LC_ALL, "Russian");t ;i ;f1, B1,q1, Cri1, Ri1, Qp1, Qn1,
Cp1, n1, y1, z1;<<" КОНТРОЛЬНАЯ РАБОТА
№2"<<endl;<<" Введите исходные
данные"<<endl;<< endl << " Количество лет : "
;>> t ;*F, *Rcz, *Rcp, *Rc, *Qc, *PR, *Ren, *x;= new double [ t ] ;= new
double [ t ] ;= new double [ t ] ;= new double [ t ] ;= new double [ t ] ;= new
double [ t ] ;= new double [ t ] ;= new double [ t ];<<"
ФОНДЫ"<<endl;<<" Колличество фондов (ед.фонд.) =
";>>f1;<<" Балансовая стоимость единицы фондов (грн) =
";>>B1;<<" Продуктивность (производство)
(произв./ед.фонд) = ";>>q1;<<" РЕСУРСЫ"<<endl;<<"
Цена на ресурсы:материальные, трудовые (грн.) =
";>>Cri1;<<" Нормы затрат ресурсов: материальных,
трудовых (рес./ед.произв. = ";>>Ri1;<<"
ПРОДУКЦИЯ"<<endl;<<" План (произв.) =
";>>Qp1;<<" Спрос (произв.) =
";>>Qn1;<<" Цена (грн./произв.) = ";>>Cp1;<<"
ПЕРЕМЕННЫЕ ИЗДЕРЖКИ"<<endl;<<" Норма амортизации =
";>>n1;<<" Доля постоянных издержек в переменных
издержках = ";>>y1;<<" Доля переменных издержек =
";>>z1;<<" Интенсивное использование
технологий:"<<endl;( i = 0 ; i<t ; i ++)>> x [ i ]
;<< "Таблиця 1 . Входные даные" << endl;<<
"----------------------------------------------------------------------"
<< endl;<< "|Наим.показателей |Условные обозначения|Ед.
измерения|Знач-я по годам" << endl;<<
"----------------------------------------------------------------------"
<< endl;<< "|Инт-ное исп.тех. | x | |";( i = 0 ; i < t
; i++) cout << x [ i ] << " | "; cout << endl
;<<"------------------------------------------------------------------------"
<< endl;( i = 0 ; i < t ; i++)[i] = f1*q1*x[i];( i = 0 ; i < t ; i++)[i]=F[i]*Ri1*Cri1;(
i = 0 ; i < t ; i++)[i]=Rcz[i]*y1+(B1*n1);( i = 0 ; i < t ;
i++)[i]=Rcz[i]+Rcp[i];( i = 0 ; i < t ; i++)[i]=F[i]*Cp1;( i = 0 ; i < t
; i++)[i]=Rc[i]-Qc[i];( i = 0 ; i < t ; i++)[i]=Rc[i]/Qc[i];<<
"Таблиця 2 . Выходные данные " <<endl;<<"--------------------------------------------------------------------------"<<endl;<<"|
Наименование | Обозначение | Ед.измерения |Расчеты по годам
"<<endl;<<"--------------------------------------------------------------------------"<<endl;<<"|
Произ-нная мощность ОВФ | F | ед.произв. |";( i = 0 ; i < t ; i++) cout
<< F [ i ] << " | "; cout << endl
;<<"--------------------------------------------------------------------------"<<endl;<<"|
Переменные издержки | Rcz | ед.рес./грн. |";( i = 0 ; i < t ; i++) cout
<< Rcz [ i ] << " | "; cout << endl
;<<"--------------------------------------------------------------------------"<<endl;<<"|Пост-ные
изд-ки,аморт-ция | Rcp | грн./ед.рес. |";( i = 0 ; i < t ; i++) cout
<< Rcp [ i ] << " | "; cout << endl
;<<"--------------------------------------------------------------------------"<<endl;<<"|Общие
ресурсы | Rc | грн./ед.рес. |";( i = 0 ; i < t ; i++) cout << Rc
[ i ] << " | "; cout << endl ;<<"--------------------------------------------------------------------------"<<endl;<<"|Выручка
от реал-ции прод.| Qc | грн. |";( i = 0 ; i < t ; i++) cout << Qc
[ i ] << " | "; cout << endl
;<<"--------------------------------------------------------------------------"<<endl;<<"|Прибыль
| PR | грн. |";( i = 0 ; i < t ; i++) cout << PR [ i ] <<
" | "; cout << endl
;<<"--------------------------------------------------------------------------"<<endl;<<"|Рентабельность
| Ren | |";( i = 0 ; i < t ; i++) cout << Ren [ i ] <<
" | "; cout << endl
;<<"--------------------------------------------------------------------------"<<endl;("PAUSE");0;
}
Література
1.
Тимонин
Ю.А. Экономическая кибернетика: [учебное пособие] / Ю.А. Тимонин - Донецк:
ДонГУ, 1999. - 397с.
2.
Шиян А.А.
Экономическая кибернетика: Введение в моделирование социальных и экономических
систем / А.А. Шиян- Кибернетический центр НАН Украины, 1998. - 124с.
3.
Шелобаев
С.И. Математические методы и модели в экономике, финансах, бизнесе: [учеб.
пособие для вузов] / С.И. Шелобаев- М.: ЮНИТИ-ДАНА, 2001. - 367 с.
4.
Гранберг
А.Г. Моделирование социалистической экономики / А.Г. Гранберг - М.: Экономика,
1988. - 487 с.
5.
Афанасьев
М.Ю., Суворов Б.П. Исследование операций в экономике: модели, задачи, решения:
[учеб. пособие.] - М.: ИНФРА-М, 2003. - 444с.
6.
Кобринский
Н.Е. Экономическая кибернетика. / Н.Е. Кобринский- М.: Экономика, 1982 г. - 407
c.
7.
Терехов
Л.Л. Кибернетика для экономистов / Л.Л. Терехов- М.: Финансы и статистика. 1983
г. - 191 с.
8.
Мэнеску
М. Экономическая кибернетика / М. Мэнеску - М.: Экономика, 1986 г. - 230c.
9.
Эртли-Каякоб
П. Экономическая кибернетика на практике [пер. с немец.] / П. Эртли-Каякоб -
М.: Экономика, 1983. -295 с.
10.Добкин В.М. Системный анализ в управлении/ В.М. Добкин- М.: Химия, 1984
г. - 224 c.
11.Кубонива М. Математическая экономика на персональном компьютере / М.
Кубонива- М.: Финансы и статистика. 1991 г. - 304 c.
Похожие работы на - Розробка програми для побудови моделі виробничої діяльності підприємства
|