|
Berechnung mit Mathematica
In[1]:= e1 = {3 x, -1 y , 2 z, +5};
In[2]:= e2 = {7 x, +2 y , 1 z, -4};
In[3]:= e3 = {6 x, -3 y , 5 z, +2};
In[4]:= e2 = e2*3-e1*7;
In[5]:= e3 = e3*3-e1*6;
In[6]:= MatrixForm[{e1,e2,e3}]
Out[6]//MatrixForm= 3 x -y 2 z 5
0 13 y -11 z -47
0 -3 y 3 z -24
In[7]:= e3 = e3*13+e2*3;
In[8]:= MatrixForm[{e1,e2,e3}]
Out[8]//MatrixForm= 3 x -y 2 z 5
0 13 y -11 z -47
0 0 6 z -453
In[9]:= e2 = e2*6+e3*11;
In[10]:= e1 = e1*6-e3*2;
In[11]:= MatrixForm[{e1,e2,e3}]
Out[11]//MatrixForm= 18 x -6 y 0 936
0 78 y 0 -5265
0 0 6 z -453
In[12]:= e1 = e1*78+e2*6;
In[13]:= MatrixForm[{e1,e2,e3}]
Out[13]//MatrixForm= 1404 x 0 0 41418
0 78 y 0 -5265
0 0 6 z -453
In[14]:= e1 = e1/1404;
In[15]:= e2 = e2/78;
In[16]:= e3 = e3/6;
In[17]:= MatrixForm[{e1,e2,e3}]
Out[17]//MatrixForm= 59
--
x 0 0 2
135
-(---)
0 y 0 2
151
-(---)
0 0 z 2
mathe online Rechnen mit Mathematica |