Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:

Методичка_матрицы

.pdf
Скачиваний:
19
Добавлен:
11.02.2015
Размер:
736.8 Кб
Скачать

Продолжение табл. 3.10

 

 

Расход на выпуск

Отгрузка

Итого

Себестоимость

 

Ресурсы

 

Эл.

Теп-

на

вы-

единицы

вар.

 

Пара

 

 

 

энер-

ла

сторону

пуск

продукции

 

 

 

 

гии

 

-

 

 

9.

1.

Топливо

65

0

0

-

5

 

2.

ХОВ

15

0

5

-

-

4

 

3.

Пар

0

25

8

0

W1

Х1

 

4.

Электроэнергия

6

0

5

25

W2

Х2

 

5.

Тепло

0

0

0

15

W3

Х3

10.

1.

Топливо

55

0

0

-

-

4

 

2.

ХОВ

12

0

5

-

-

3

 

3.

Пар

0

23

5

0

W1

Х1

 

4.

Электроэнергия

4

0

3

23

W2

Х2

 

5.

Тепло

0

0

0

14

W3

Х3

11.

1.

Топливо

65

0

0

-

-

4

 

2.

ХОВ

20

0

10

-

-

2

 

3.

Пар

0

29

7

0

W1

Х1

 

4.

Электроэнергия

6

0

4

25

W2

Х2

 

5.

Тепло

0

0

0

13

W3

Х3

12.

1.

Топливо

40

0

0

-

-

6

 

2.

ХОВ

7

0

4

-

-

4

 

3.

Пар

0

16

4

0

W1

Х1

 

4.

Электроэнергия

3

0

2

15

W2

Х2

 

5.

Тепло

0

0

0

10

W3

Х3

13.

1.

Топливо

45

0

0

-

-

5

 

2.

ХОВ

8

0

5

-

-

2

 

3.

Пар

0

20

5

0

W1

Х1

 

4.

Электроэнергия

4

0

3

18

W2

Х2

 

5.

Тепло

0

0

0

11

W3

Х3

14.

1.

Топливо

52

0

0

-

-

7

 

2.

ХОВ

11

0

5

-

-

4

 

3.

Пар

0

22

5

0

W1

Х1

 

4.

Электроэнергия

4

0

3

20

W2

Х2

 

5.

Тепло

0

0

0

12

W3

Х3

15.

1.

Топливо

35

0

0

-

-

6

 

2.

ХОВ

7

0

5

-

-

3

 

3.

Пар

0

15

4

0

W1

Х1

 

4.

Электроэнергия

3

0

2

15

W2

Х2

 

5.

Тепло

0

0

0

9

W3

Х3

16.

1.

Топливо

49

0

0

-

-

4

 

2.

ХОВ

12

0

5

-

-

2

 

3.

Пар

0

19

5

0

W1

Х1

 

4.

Электроэнергия

4

0

3

21

W2

Х2

 

5.

Тепло

0

0

0

11

W3

Х3

21

Продолжение табл. 3.10

 

 

Расход на выпуск

Отгрузка

Итого

Себестоимость

 

Ресурсы

 

Эл.

Теп-

на

вы-

единицы

вар.

 

Пара

 

 

 

энер-

ла

сторону

пуск

продукции

 

 

 

 

гии

 

-

 

 

17.

1.

Топливо

58

0

0

-

8

 

2.

ХОВ

15

0

6

-

-

3

 

3.

Пар

0

26

6

0

W1

Х1

 

4.

Электроэнергия

5

0

4

23

W2

Х2

 

5.

Тепло

0

0

0

14

W3

Х3

18.

1.

Топливо

90

0

0

-

-

8

 

2.

ХОВ

20

0

9

-

-

4

 

3.

Пар

0

35

10

0

W1

Х1

 

4.

Электроэнергия

8

0

6

35

W2

Х2

 

5.

Тепло

0

0

0

20

W3

Х3

19.

1.

Топливо

80

0

0

-

-

7

 

2.

ХОВ

15

0

10

-

-

4

 

3.

Пар

0

35

10

0

W1

Х1

 

4.

Электроэнергия

8

0

6

35

W2

Х2

 

5.

Тепло

0

0

0

19

W3

Х3

20.

1.

Топливо

70

0

0

-

-

4

 

2.

ХОВ

15

0

8

-

-

2

 

3.

Пар

0

30

8

0

W1

Х1

 

4.

Электроэнергия

6

0

5

30

W2

Х2

 

5.

Тепло

0

0

0

15

W3

Х3

21.

1.

Топливо

70

0

0

-

-

4

 

2.

ХОВ

18

0

7

-

-

3

 

3.

Пар

0

31

7

0

W1

Х1

 

4.

Электроэнергия

7

0

6

30

W2

Х2

 

5.

Тепло

0

0

0

15

W3

Х3

22.

1.

Топливо

80

0

0

-

-

3

 

2.

ХОВ

15

0

9

-

-

1

 

3.

Пар

0

30

9

0

W1

Х1

 

4.

Электроэнергия

7

0

6

33

W2

Х2

 

5.

Тепло

0

0

0

17

W3

Х3

23.

1.

Топливо

95

0

0

-

-

4

 

2.

ХОВ

20

0

10

-

-

2

 

3.

Пар

0

40

10

0

W1

Х1

 

4.

Электроэнергия

10

0

6

45

W2

Х2

 

5.

Тепло

0

0

0

25

W3

Х3

24.

1.

Топливо

59

0

0

-

-

5

 

2.

ХОВ

14

0

6

-

-

2

 

3.

Пар

0

28

8

0

W1

Х1

 

4.

Электроэнергия

6

0

4

27

W2

Х2

 

5.

Тепло

0

0

0

15

W3

Х3

22

Окончание табл. 3.10

 

 

Расход на выпуск

Отгрузка

Итого

Себестоимость

 

Ресурсы

 

Эл.

Теп-

на

вы-

единицы

вар.

 

Пара

 

 

 

энер-

ла

сторону

пуск

продукции

 

 

 

 

гии

 

-

 

 

25.

1.

Топливо

90

0

0

-

6

 

2.

ХОВ

25

0

10

-

-

2

 

3.

Пар

0

45

10

0

W1

Х1

 

4.

Электроэнергия

8

0

6

40

W2

Х2

 

5.

Тепло

0

0

0

22

W3

Х3

Контрольная работа оформляется в электронном и печатном вариантах. В отчете по контрольной работе для каждой задачи приводятся условие, решение и выводы. Наиболее значимые этапы решения комментируются.

23

Приложение 1

Текст функции Diag(Vector) на языке Visual Basic.

‘Функция Diag разворачивает вектор-строку или вектор-столбец в диагональную матрицу.

Function Diag(Vector As Range) As Variant Dim r, c As Integer

Dim i, j As Integer Dim md()

r = Vector.Rows.Count

c = Vector.Columns.Count If r > 1 And c > 1 Then

MsgBox ("В диагональную матрицу можно развернуть только строку или столбец, но не матрицу из нескольких строк и нескольких столбцов")

ElseIf r > 1 Then

ReDim md(1 To r, 1 To r) For i = 1 To r

For j = 1 To r If i = j Then

md(i, j) = Vector(i) Else

md(i, j) = 0 End If

Next j Next i

ElseIf c > 1 Then

ReDim md(1 To c, 1 To c) For i = 1 To c

For j = 1 To c If i = j Then

md(i, j) = Vector(i) Else

md(i, j) = 0 End If

Next j Next i

End If Diag = md

End Function

24