Degtyarenko_dlya_studentov_II_kursa_2013 / Детерминир. модели / Детерм. мод. - лаб. работы / Лаб. раб. 1 / Решенные лекционные задачи / Лаб. работа1
.1.pdf
РАСЧЕТ СМЕСЕЙ СЛОЖНОГО СОСТАВА
Основная матрица системы
In[1]:= a 5, 0, 30 , 85, 0, 0 , 10, 100, 70
Out[1]= 5, 0, 30 , 85, 0, 0 , 10, 100, 70
In[2]:= MatrixForm a
Out[2]//MatrixForm=
5 0 30
85 0 0
10 100 70
Столбец свободных членов системы
In[3]:= b 4250 22, 4250 16, 4250 62
Out[3]= 93500, 68000, 263500
Вычисление определителя матрицы а
In[4]:= Det a
Out[4]= 255000
Определитель основной матрицы системы отличен от нуля,
следовательно,система имеет единственное решение,
которое может быть найдено при помощи различных встроенных функций системы Mathematica,
например,при помощи функции LinearSolve или функции RowReduce
In[5]:= res1 LinearSolve a, b
1400 8950
Out[5]= 800, 
, 
3 3
In[6]:= res2 N res1
Out[6]= 800., 466.667, 2983.33
Расширенная матрица системы
In[7]:= а1 5, 0, 30, 93500 , 85, 0, 0, 68000 , 10, 100, 70, 263500
Out[7]= 5, 0, 30, 93500 , 85, 0, 0, 68000 , 10, 100, 70, 263500
In[8]:= MatrixForm а1
Out[8]//MatrixForm=
5 0 30 93500
85 0 0 68000
|
10 |
100 |
70 |
263500 |
|
|
|
|
|
|||||||
In[9]:= |
RowReduce а1 |
|
|
|
|
|
|
|
|
|
|
|||||
|
|
|
|
|
|
|
|
|
|
|
1400 |
|
|
|
|
8950 |
Out[9]= |
|
|
|
800 |
, |
0, 1, 0, |
, |
0, 0, 1, |
|
|||||||
|
|
1, 0, 0, |
|
|
|
|
3 |
|
|
3 |
||||||
|
|
|
|
|
|
|
|
|
|
|
|
|
||||
In[10]:= |
1 |
0 |
0 |
|
|
|
|
|
|
|
|
|
||||
MatrixForm |
|
|
|
|
|
|
|
|
|
|||||||
Out[10]//MatrixForm= |
800 |
|
|
|
|
|
|
|
|
|
|
|||||
|
|
|
|
|
|
|
|
|
|
|
|
|
|
|
||
|
0 |
1 |
0 |
1400 |
|
|
|
|
|
|
|
|
|
|
||
|
3 |
|
|
|
|
|
|
|
|
|
|
|||||
|
0 |
0 |
1 |
8950 |
|
|
|
|
|
|
|
|
|
|
||
3
2 Лаб. работа1.1.nb
Проверка полученного результата
In[11]:= sum Sum res1 i , i, 3
Out[11]= 4250
Ответ
In[12]:= res2
Out[12]= 800., 466.667, 2983.33