Ibrahimkgr86

0 Reputation

0 Badges

0 years, 0 days

MaplePrimes Activity


These are questions asked by Ibrahimkgr86

How to solve the following  system of equation in maple

> restart;
> with(LinearAlgebra);


> el1 := a[0] = 1;
                                  
> el2 := a[0]+a[1]+a[2]+a[3]+a[4]+a[5]+a[6]+a[7]+a[8]+a[9]+a[10]+a[11]+a[12]+a[13]+a[14]+a[15] = 3/2+sinh(1);
 

        
> el3 := a[1] = 1;
                                 
> el4 := a[1]+2*a[2]+3*a[3]+4*a[4]+5*a[5]+6*a[6]+7*a[7]+8*a[8]+9*a[9]+10*a[10]+11*a[11]+12*a[12]+13*a[13]+14*a[14]+15*a[15] = 1+cosh(1);
 

   
> el5 := 24*a[4]-(2*(1+c))*a[2]+c*a[0] = -1;
> el6 := 24*a[4]+120*a[5]+360*a[6]+840*a[7]+1680*a[8]+3024*a[9]+5040*a[10]+7920*a[11]+11880*a[12]+17160*a[13]+24024*a[14]+32760*a[15]-(1+c)*(2*a[2]+6*a[3]+12*a[4]+20*a[5]+30*a[6]+42*a[7]+56*a[8]+72*a[9]+90*a[10]+110*a[11]+132*a[12]+156*a[13]+182*a[14]+210*a[15])+c*(a[0]+a[1]+a[2]+a[3]+a[4]+a[5]+a[6]+a[7]+a[8]+a[9]+a[10]+a[11]+a[12]+a[13]+a[14]+a[15])-(1/2)*c = -1;
 

  

 
> el7 := 120*a[5]-(6*(1+c))*a[3]+c*a[1] = 0;
                   120 a[5] - 6 (1 + c) a[3] + c a[1] = 0
> el8 := 120*a[5]+720*a[6]+2520*a[7]+6720*a[8]+15120*a[9]+30240*a[10]+55440*a[11]+95040*a[12]+154440*a[13]+240240*a[14]+360360*a[15]-(1+c)*(6*a[3]+24*a[4]+60*a[5]+120*a[6]+210*a[7]+336*a[8]+504*a[9]+720*a[10]+990*a[11]+1320*a[12]+1716*a[13]+2184*a[14]+2730*a[15])+c*(a[1]+2*a[2]+3*a[3]+4*a[4]+5*a[5]+6*a[6]+7*a[7]+8*a[8]+9*a[9]+10*a[10]+11*a[11]+12*a[12]+13*a[13]+14*a[14]+15*a[15])-c = 0;
 

 

 

  

   
> el9 := 720*a[6]-(24*(1+c))*a[4]+2*c*a[2]-c = 0;
                
> el10 := 720*a[6]+5040*a[7]+20160*a[8]+60480*a[9]+151200*a[10]+332640*a[11]+665280*a[12]+1235520*a[13]+2162160*a[14]+3603600*a[15]-(1+c)*(24*a[4]+120*a[5]+360*a[6]+840*a[7]+1680*a[8]+3024*a[9]+5040*a[10]+7920*a[11]+11880*a[12]+17160*a[13]+24024*a[14]+32760*a[15])+c*(2*a[2]+6*a[3]+12*a[4]+20*a[5]+30*a[6]+42*a[7]+56*a[8]+72*a[9]+90*a[10]+110*a[11]+132*a[12]+156*a[13]+182*a[14]+210*a[15])-c = 0;

 

 
> el11 := 5040*a[7]-(120*(1+c))*a[5]+6*c*a[3] = 0;
                 
> el12 := 5040*a[7]+40320*a[8]+181440*a[9]+604800*a[10]+1663200*a[11]+3991680*a[12]+8648640*a[13]+17297280*a[14]+32432400*a[15]-(1+c)*(120*a[5]+720*a[6]+2520*a[7]+6720*a[8]+15120*a[9]+30240*a[10]+55440*a[11]+95040*a[12]+154440*a[13]+240240*a[14]+360360*a[15])+c*(6*a[3]+24*a[4]+60*a[5]+120*a[6]+210*a[7]+336*a[8]+504*a[9]+720*a[10]+990*a[11]+1320*a[12]+1716*a[13]+2184*a[14]+2730*a[15]) = 0;
 

 

 
> el13 := 40320*a[8]-(720*(1+c))*a[6]+24*c*a[4] = 0;
                
> el14 := 40320*a[8]+362880*a[9]+1814400*a[10]+6652800*a[11]+19958400*a[12]+51891840*a[13]+121080960*a[14]+259459200*a[15]-(1+c)*(720*a[6]+5040*a[7]+20160*a[8]+60480*a[9]+151200*a[10]+332640*a[11]+665280*a[12]+1235520*a[13]+2162160*a[14]+3603600*a[15])+c*(24*a[4]+120*a[5]+360*a[6]+840*a[7]+1680*a[8]+3024*a[9]+5040*a[10]+7920*a[11]+11880*a[12]+17160*a[13]+24024*a[14]+32760*a[15]) = 0;

   
> el15 := 362880*a[9]-(5040*(1+c))*a[7]+120*c*a[5] = 0;
              
> el16 := 362880*a[9]+3628800*a[10]+19958400*a[11]+79833600*a[12]+259459200*a[13]+726485760*a[14]+1816214400*a[15]-(1+c)*(5040*a[7]+40320*a[8]+181440*a[9]+604800*a[10]+1663200*a[11]+3991680*a[12]+8648640*a[13]+17297280*a[14]+32432400*a[15])+c*(120*a[5]+720*a[6]+2520*a[7]+6720*a[8]+15120*a[9]+30240*a[10]+55440*a[11]+95040*a[12]+154440*a[13]+240240*a[14]+360360*a[15]) = 0;

   


> solve({el1, el2, el3, el4, el5, el6, el7, el8, el9, el10, el11, el12, el13, el14, el15, el16}, {a[0], a[1], a[2], a[3], a[4], a[5], a[6], a[7], a[8], a[9], a[10], a[11], a[12], a[13], a[14], a[15]});
i need it in  numerical format

Page 1 of 1