Автор работы: Пользователь скрыл имя, 09 Октября 2012 в 18:21, курсовая работа
Межотраслевой баланс (МОБ, метод «затраты-выпуск») — экономико-математическая балансовая модель, характеризующая межотраслевые производственные взаимосвязи в экономике страны. Характеризует связи между выпуском продукции в одной отрасли и затратами, расходованием продукции всех участвующих отраслей, необходимым для обеспечения этого выпуска. Межотраслевой баланс составляется в денежной и натуральной формах.
Межотраслевой баланс представлен в виде системы линейных уравнений. Межотраслевой баланс представляет собой таблицу, в которой отражен процесс формирования и использования совокупного общественного продукта в отраслевом разрезе. Таблица показывает структуру затрат на производство каждого продукта и структуру его распределения в экономике. По столбцам отражается стоимостный состав валового выпуска отраслей экономики по элементам промежуточного потребления и добавленной стоимости. По строкам отражаются направления использования ресурсов каждой отрасли.
1. Межотраслевой баланс……………………………………………. 3
2. Модель Леонтьева…………………………………………………...3
3. Затраты в модели Леонтьева………………………………………..7
4. Теория трудовой стоимости Маркса в модели Леонтьева………. 9
5. Постановка задачи………………………………………………… 12
6. Блок-схема…………………………………………………………. 13
7. Program ZADANIE………………………………………………… 14
8. Список литературы………………………………………………... 17
С трудами и именем К. Маркса связано новое направление в исследовании экономических и социальных процессов. Его экономическая теория насквозь социологична, что можно рассматривать как силу и как слабость марксистской концепции. Абсолютизируя революционные способы разрешения противоречий, Маркс недооценивал эволюционные, согласительные формы их преодоления.
В. Леонтьев: «Значение Маркса для современной экономической теории заключается в том, что его работы – это неистощимый источник прямых, непосредственных наблюдений действительности. Значительную часть современных теорий составляют производные, вторичные концепции. (...) Если, перед тем как пытаться дать какое-либо объяснение экономического развития, некто захочет узнать, что в действительности представляют собой прибыль, заработная плата, капиталистическое предприятие, он может получить в трех томах «Капитала» более реалистическую и качественную информацию, чем та, которую он мог бы найти в десяти последовательных выпусках «Цензов США», в дюжине учебников по современной экономике и даже, осмеюсь сказать, в собрании сочинений Торстена Веблена».
5. Постановка задачи.
Исходные данные: , , .
Решение.
1. Согласно 1-му критерию продуктивности, модель Леонтьева с матрицей продуктивна тогда и только тогда, когда существует неотрицательная матрица . В нашем случае получаем .
2. Продуктивная модель Леонтьева с матрицей позволяет произвести неотрицательный вектор потребления для любого вектора потребления . В нашем случае
3. Экономика, характеризуемая матрицей и векторами и , называется высокоэффективной, если .
В нашем случае
4. В нашем случае
5. Вывод
Экономика в нашем случае является неэффективной, т.к.
.
6. Блок-схема.
7. Program ZADANIE.
Program ZADANIE;
uses crt;
type
vektor = array[1..2] of real;
matrica = array[1..2,1..2] of real;
var c,x,AX,x_sh:vektor;
A,A_sh,B,E,Y:matrica;
i,j:integer;
del:real;
function OPRED(C:matrica):real;
begin
OPRED:=C[1,1]*C[2,2]-C[2,1]*C[
end;
procedure TRANS(var C:matrica);
var H:real;
begin
H:=C[2,1];C[2,1]:=C[1,2];C[1,
end;
procedure ZVEZD(var C:matrica);
var H:matrica;
begin
for i:=1 to 2 do
for j:=1 to 2 do
H[i,j]:=C[3-i,3-j];
C:=H;
end;
procedure OBRATNAYAMATRICA(var C:matrica);
begin
ZVEZD(C);
TRANS(C);
del:=OPRED(C);
for i:=1 to 2 do
for j:=1 to 2 do
C[i,j]:=C[i,j]/del;
end;
procedure UMNOJ(C:matrica;G:vektor;var H:vektor);
begin
H[1]:=C[1,1]*G[1]+C[1,2]*G[2];
H[2]:=C[2,1]*G[1]+C[2,2]*G[2];
end;
procedure VIVOD(C:matrica);
begin
for i:=1 to 2 do begin
for j:=1 to 2 do
Write(C[i,j]:7:2);
Writeln;
end;
procedure VIVODVEK(C:vektor);
begin
for j:=1 to 2 do
Writeln(C[j]:7:2);
end;
begin
clrscr;
c[1]:=10;c[2]:=2;
A[1,1]:=1/3;A[1,2]:=1/3;
A[2,1]:=1/5;A[2,2]:=2/5;
A_sh[1,1]:=2/5;A_sh[1,2]:=1/5;
A_sh[2,1]:=1/8;A_sh[2,2]:=1/4;
for i:=1 to 2 do
for j:=1 to 2 do
if i=j then E[i,j]:=1 else E[i,j]:=0;
for i:=1 to 2 do
for j:=1 to 2 do
B[i,j]:=ABS(E[i,j]-A[i,j]);
OBRATNAYAMATRICA(B);
Writeln('Matrica B:');
VIVOD(B);
UMNOJ(B,C,X);
Writeln('Vektor volnovogo vipuska X, obespechivaushiy danniy vektor potrebleniya:');
VIVODVEK(X);
UMNOJ(A,X,AX);
Writeln('Proizvedenie matrici A na vektor X:');
VIVODVEK(AX);
for i:=1 to 2 do
for j:=1 to 2 do
Y[i,j]:=ABS(E[i,j]-A_sh[i,j]);
OBRATNAYAMATRICA(Y);
UMNOJ(Y,C,x_sh);
Writeln('Vektor x^:');
VIVODVEK(x_sh);
readkey;
end.
8. Список литературы.
Информация о работе Статистические модели макроэкономики, модели Леонтьева