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

Виконання контрольної роботи включає

1. Постанова завдання

2. Рішення в «EXCEL»

3. Побудування моделі рішення за допомогою «С++»

4. Використана література

1. Постанова завдання для виконання контрольної роботи

З метою належного виконання роботи, визначимо данні (показники) для опрацювання в Excel та за допомогою С++.

Таким чином визначимо за робочі дані таблиці з методичних рекомендації до виконання контрольної роботи Таблиця №1 «Основні показники які описують підприємство» за допомогою, змінних, якої будьмо вирішувати показники Таблиця №2 «Вихідні дані».

2. Формалізація моделі виробничої діяльності підприємства (вхідні дані)

Основні показники, які описують підприємство, надані в табл. 1

Таблиця 1

Вихідні дані

Найменування показників	Умовні позначення	Од. вимірювання	Значення
Фонди	Кількість фондів	f	од.фонд.	100
	Балансова вартість одиниці фондів	B	грн.	250
	Продуктивність (виробництво)	q	вироб./од.фонд	5
Ресурси	Ціна на ресурси:	срес i	грн.
	матеріальні			5
	трудові			2
	Норми витрат ресурсів:	r i	рес./ од.вироб.
	матеріальних			2
	трудових			1
Продукція	план	Qр	вироб.	20
	попит	Qп	вироб.	5
	ціна	c прод	грн./вироб.	25
	Норма амортізації	n		3
Змінні	Інтенсивне використання технологій	г
	Частка постійних витрат в змінних витратах	б		2
	Частка змінних витрат	в	грн	2

3. Рішення задачі в EXCEL

Алгоритм розрахунку моделі зведемо в таблицю 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"

using namespace std;

int _tmain(int argc, _TCHAR* argv[])

{

system("COLOR F0"); // белый фон, русский язык

setlocale(LC_ALL, "Russian"); // русский шрифт

int const nn = 2, oo = 6, ii = 8; // nn константа и будет иметь неизменное значение 2 и оо = 6

double c_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]

cout << "Контрольная Работа 1" << endl; // вывод на экран Контрольная Работа 1

cout << "Введите входные показатели" << endl; // Аналогично

cout << "введите Продуктивность пр-ва. показатель q ="; // вывод на экран введите первый показатель = и ожидание ввода с клавиатуры числа и только числа (ввести букву можно тоже но решения не будет), а затем нажати Enter

cin >> q; // Запись значения введеного с клавиатуры числа в q

cout << " введите Количество фондов показатель f ="; // вывод на экран введите второй показатель = и ожидание ввода с клавиатуры числа и только числа (ввести букву можно тоже но решения не будет), а затем нажати Enter

cin >> f; // Запись значения введеного с клавиатуры числа в f

cout << " введите Балансовая стоимость единици фондов показатель b ="; // вывод на экран введите третий показатель = и ожидание ввода с клавиатуры числа и только числа (ввести букву можно тоже но решения не будет), а затем нажати Enter

cin >> b; // Запись значения введеного с клавиатуры числа в b

cout << endl;

cout << "Введите входные показатели где:" << endl;

cout << " [1]- Цена на ресурсы материальные " << endl;

cout << " [2]- Цена на ресурсы трудовые" << endl;

for (int i = 0; i < nn; i++)

{

cout << "[" << i + 1 << "]" << ": ";

cin >> c_res[i];

}

cout << " [3]- Нормы затрат ресурсов материальнх " << endl;

cout << " [4]- Нормы затрат ресурсов трудовых " << endl;

for (int i = 0; i < nn; i++)

{

cout << "[" << i + 3 << "]" << ": ";

cin >> r_res[i];

}

cout << " [5]- План продукции = " ;

cin >> Q_p;

dan[0] = Q_p;

cout << " [6]- Спрос продукции = " ;

cin >> Q_n;

dan[1] = Q_n;

cout << " [7]- Цена продукции = " ;

cin >> C_prod;

dan[2] = C_prod;

cout << " [8]- Норма амортизации = " ;

cin >> n;

dan[3] = n;

cout << " [9]- Доля постоянных затрат в переменных затратах = " ;

cin >> A;

dan[4] = A;

cout << "[10]- Доля переменных затрат = " ;

cin >> B;

dan[5] = B;

cout << endl;

cout << "------------------------------------------------------------------" << endl;

cout << "------------------------------------------------------------------" << endl;

cout << "! Переменные ! Значения !" << endl;

cout << "------------------------------------------------------------------" << endl;

cout << "!Продуктивность пр-ва. показатель " << " ! " << q << " !" << endl;

cout << "!Количество фондов " << " ! " << f << " !" << endl;

cout << "!Балансовая стоимость единиц фондов " << " ! " << b << " !" << endl;

cout << "------------------------------------------------------------------" << endl;

for (int i = 0; i < nn; ++i)

{

cout << "! А" << i + 1 << " ! " << c_res[i] << " ! " << endl;

cout << "------------------------------------------------------------------" << endl;

}

for (int i = 0; i < nn; ++i)

{

cout << "! А" << i + 3 << " ! " << r_res[i] << " ! " << endl;

cout << "------------------------------------------------------------------" << endl;

}

for (int i = 0; i < oo; ++i)

{

cout << "! А" << i + 5 << " ! " << dan[i] << " ! " << endl;

cout << "------------------------------------------------------------------" << endl;

}

cout << "------------------------------------------------------------------" << endl;

system("PAUSE");

for (int i = 0; i < nn; i++)

{

sum = sum + c_res[i] * r_res[i];

}

F = q*f;

itog[0] = F;

Rc_zmin = F * sum;

itog[1] = Rc_zmin;

Am = b*n;

Rc_post = Rc_zmin * A + Am;

itog[2] = Rc_post;

Rc = Rc_zmin + Rc_post;

itog[3] = Rc;

Qc = f * q * C_prod;

itog[4] = Qc;

PR = Rc - Qc;

itog[5] = PR;

Ren = Rc / Qc;

itog[6] = Ren;

itog[7] = Am;

cout << "------------------------------------------------------------------" << endl;

cout << "------------------------------------------------------------------" << endl;

cout << "выходные данные показатели" << endl;

cout << " [1]- Производственная мощность ОПФ " << endl;

cout << " [2]- Переменные затраты " << endl;

cout << " [3]- Постоянные расходы " << endl;

cout << " [4]- Совместные ресурсы " << endl;

cout << " [5]- Выручка от реализации продукции " << endl;

cout << " [6]- Прибыль " << endl;

cout << " [7]- Рентабельность " << endl;

cout << " [8]- Амортизація " << endl;

cout << "------------------------------------------------------------------" << endl;

for (int i = 0; i < ii; ++i)

{

cout << "! А" << i + 1 << " ! " << itog[i] << " ! " << endl;

cout << "------------------------------------------------------------------" << endl;

}

system("PAUSE");

return 0;

}



Контрольна робота № 2

1. Постановка задачи:

Розглянемо підприємство, яке випускає продукцію на протязі 5-го періоду часу (5 років). Умовно припустимо, що розглядаються фонди тільки одного виду.

Знайти оптимальну програму функціонування підприємства за 5-ий період часу (5 років) з урахуванням спільного використання ресурсів і фондів.

2. Формалізація моделі виробничої діяльності підприємства (вхідні дані)

Основні показники, які описують підприємство, надані в табл. 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	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

3. Рішення задачі в 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	675	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

4. Програма на С + + (код програми).

#include "stdafx.h"

#include "stdafx.h"

#include "iostream"

#include "stdlib.h"

using namespace std;

int _tmain(int argc, _TCHAR* argv[])

{

system("mode con cols=120 lines=80");

system ("COLOR F0");

setlocale (LC_ALL, "Russian");

int t ;

int i ;

double f1, B1,q1, Cri1, Ri1, Qp1, Qn1, Cp1, n1, y1, z1;

cout <<" КОНТРОЛЬНАЯ РАБОТА №2"<<endl;

cout<<" Введите исходные данные"<<endl;

cout << endl << " Количество лет : " ;

cin >> t ;

double *F, *Rcz, *Rcp, *Rc, *Qc, *PR, *Ren, *x;

F = new double [ t ] ;

Rcz = new double [ t ] ;

Rcp = new double [ t ] ;

Rc = new double [ t ] ;

Qc = new double [ t ] ;

PR = new double [ t ] ;

Ren = new double [ t ] ;

x = new double [ t ];

cout<<" ФОНДЫ"<<endl;

cout<<" Колличество фондов (ед.фонд.) = ";

cin>>f1;

cout<<" Балансовая стоимость единицы фондов (грн) = ";

cin>>B1;

cout<<" Продуктивность (производство) (произв./ед.фонд) = ";

cin>>q1;

cout<<" РЕСУРСЫ"<<endl;

cout<<" Цена на ресурсы:материальные, трудовые (грн.) = ";

cin>>Cri1;

cout<<" Нормы затрат ресурсов: материальных, трудовых (рес./ед.произв. = ";

cin>>Ri1;

cout<<" ПРОДУКЦИЯ"<<endl;

cout<<" План (произв.) = ";

cin>>Qp1;

cout<<" Спрос (произв.) = ";

cin>>Qn1;

cout<<" Цена (грн./произв.) = ";

cin>>Cp1;

cout<<" ПЕРЕМЕННЫЕ ИЗДЕРЖКИ"<<endl;

cout<<" Норма амортизации = ";

cin>>n1;

cout<<" Доля постоянных издержек в переменных издержках = ";

cin>>y1;

cout<<" Доля переменных издержек = ";

cin>>z1;

cout<<" Интенсивное использование технологий:"<<endl;

for ( i = 0 ; i<t ; i ++)

cin >> x [ i ] ;

cout << "Таблиця 1 . Входные даные" << endl;

cout << "----------------------------------------------------------------------" << endl;

cout << "|Наим.показателей |Условные обозначения|Ед. измерения|Знач-я по годам" << endl;

cout << "----------------------------------------------------------------------" << endl;

cout<< "|Инт-ное исп.тех. | x | |";

for ( i = 0 ; i < t ; i++) cout << x [ i ] << " | "; cout << endl ;

cout<<"------------------------------------------------------------------------" << endl;

for ( i = 0 ; i < t ; i++)

F[i] = f1*q1*x[i];

for ( i = 0 ; i < t ; i++)

Rcz[i]=F[i]*Ri1*Cri1;

for ( i = 0 ; i < t ; i++)

Rcp[i]=Rcz[i]*y1+(B1*n1);

for ( i = 0 ; i < t ; i++)

Rc[i]=Rcz[i]+Rcp[i];

for ( i = 0 ; i < t ; i++)

Qc[i]=F[i]*Cp1;

for ( i = 0 ; i < t ; i++)

PR[i]=Rc[i]-Qc[i];

for ( i = 0 ; i < t ; i++)

Ren[i]=Rc[i]/Qc[i];

cout << "Таблиця 2 . Выходные данные " <<endl;

cout<<"--------------------------------------------------------------------------"<<endl;

cout<<"| Наименование | Обозначение | Ед.измерения |Расчеты по годам "<<endl;

cout<<"--------------------------------------------------------------------------"<<endl;

cout<<"| Произ-нная мощность ОВФ | F | ед.произв. |";

for ( i = 0 ; i < t ; i++) cout << F [ i ] << " | "; cout << endl ;

cout<<"--------------------------------------------------------------------------"<<endl;

cout<<"| Переменные издержки | Rcz | ед.рес./грн. |";

for ( i = 0 ; i < t ; i++) cout << Rcz [ i ] << " | "; cout << endl ;

cout<<"--------------------------------------------------------------------------"<<endl;

cout<<"|Пост-ные изд-ки,аморт-ция | Rcp | грн./ед.рес. |";

for ( i = 0 ; i < t ; i++) cout << Rcp [ i ] << " | "; cout << endl ;

cout<<"--------------------------------------------------------------------------"<<endl;

cout<<"|Общие ресурсы | Rc | грн./ед.рес. |";

for ( i = 0 ; i < t ; i++) cout << Rc [ i ] << " | "; cout << endl ;

cout<<"--------------------------------------------------------------------------"<<endl;

cout<<"|Выручка от реал-ции прод.| Qc | грн. |";

for ( i = 0 ; i < t ; i++) cout << Qc [ i ] << " | "; cout << endl ;

cout<<"--------------------------------------------------------------------------"<<endl;

cout<<"|Прибыль | PR | грн. |";

for ( i = 0 ; i < t ; i++) cout << PR [ i ] << " | "; cout << endl ;

cout<<"--------------------------------------------------------------------------"<<endl;

cout<<"|Рентабельность | Ren | |";

for ( i = 0 ; i < t ; i++) cout << Ren [ i ] << " | "; cout << endl ;

cout<<"--------------------------------------------------------------------------"<<endl;

system("PAUSE");

return 0;

}



Література

Тимонин Ю.А. Экономическая кибернетика: [учебное пособие] / Ю.А. Тимонин - Донецк: ДонГУ, 1999. -- 397с.

Шиян А.А. Экономическая кибернетика: Введение в моделирование социальных и экономических систем / А.А. Шиян- Кибернетический центр НАН Украины, 1998. - 124с.

Шелобаев С.И. Математические методы и модели в экономике, финансах, бизнесе: [учеб. пособие для вузов] / С.И. Шелобаев- М.: ЮНИТИ-ДАНА, 2001. - 367 с.

Гранберг А.Г. Моделирование социалистической экономики / А.Г. Гранберг - М.: Экономика, 1988. - 487 с.

Афанасьев М.Ю., Суворов Б.П. Исследование операций в экономике: модели, задачи, решения: [учеб. пособие.] - М.: ИНФРА-М, 2003. - 444с.

Кобринский Н.Е. Экономическая кибернетика. / Н.Е. Кобринский- М.: Экономика, 1982 г. - 407 c.

Терехов Л.Л. Кибернетика для экономистов / Л.Л. Терехов- М.: Финансы и статистика. 1983 г. - 191 с.

Мэнеску М. Экономическая кибернетика / М. Мэнеску - М.: Экономика, 1986 г. - 230c.

Эртли-Каякоб П. Экономическая кибернетика на практике [пер. с немец.] / П. Эртли-Каякоб - М.: Экономика, 1983. -295 с.

Добкин В.М. Системный анализ в управлении/ В.М. Добкин- М.: Химия, 1984 г. - 224 c.

Кубонива М. Математическая экономика на персональном компьютере / М. Кубонива- М.: Финансы и статистика. 1991 г. - 304 c.

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