Advertisement
Guest User

Untitled

a guest
Mar 23rd, 2019
81
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
MatLab 2.46 KB | None | 0 0
  1. close all
  2. clear all
  3. clc
  4.  
  5. %% data
  6. X = [[85, 25, 0 ],
  7.      [35, 25, 25],
  8.      [10, 5,  45]]; % исходные данные
  9. Y = [60, 80, 45]'; % конечный продукт
  10. Fi = [160, 130, 80]'; % ОСНОВНЫЕ ФОНДЫ В МЛРД.РУБ
  11. %% Вектор валового продукта по отраслям
  12. XV = sum(X, 2) + Y;  % найдем вектор валового продукта по отраслям, XV_k = ∑_(i=1)^n Xkj+Yk
  13. disp('Вектор валового продукта по отраслям : ')
  14. XV
  15. %% Коэффициенты прямых материальных затрат равны
  16. A = zeros(3, 3);  % создаем матрицу 3х3, заполненную нулями
  17. A = X ./ (XV)'; % коэффициенты прямых материальных затрат равны:
  18. disp('Коэффициенты прямых материальных затрат равны: ')
  19. A
  20. %% Матрица коэффициентов полных материальных затрат
  21. E = eye(3); % создаем единичную матрицу 3х3
  22. C = inv(E - A) - E; % C = (E - A)^(-1) - E
  23. disp('Матрица коэффициентов полных материальных затрат: ')
  24. C
  25. %% Коэффициент прямой и полной фондоемкости
  26. disp('Коэффициент прямой и полной фондоемкости:')
  27. f = (Fi./XV)'
  28. F = f * inv(E - A)
  29. %% Величина изменения валового выпуска продукта отраслей
  30. dYi = [0.1, -0.3, 0.25]';
  31. DY = Y.*dYi;
  32. dX = inv(E - A) * DY;
  33. disp('Величина изменения валового выпуска продукта отраслей:');
  34. DX = A .* dX'
  35. %% Дополнительная потребность в основных производственных фондах
  36. disp('Дополнительная потребность в основных производственных фондах')
  37. dFi = (f .* dX')'
  38. %% Величину материальных затрат в каждую отрасль
  39. disp('Величину материальных затрат в каждую отрасль:')
  40. z = sum(X)'
  41. %% Долю чистого продукта и амортизационных отчислений для каждой отрасли
  42. disp('Долю чистого продукта и амортизационных отчислений для каждой отрасли: ')
  43. Z = XV - z
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement