fork download 
  1. % 7x+2y-3z=21
  2. % 2x+3y+5z=30
  3. % 3x-5y+9z=15
  4. A=[7,2,-3;2,3,5;3,-5,9];
  5. b=[21;30;15];
  6. S=inv(A)*b;
  7. % x=(21-2*y+3*z)/7;
  8. % y=(30-2*x-5*z)/3;
  9. % z=(15-3*x+5*y)/9;
  10.  
  11. %initial guess
  12. a=4;
  13. b=-.5;
  14. c=3;
  15.  
  16. for i=1:30
  17.     x=(21-2*b+3*c)/7;
  18.     y=(30-2*a-5*c)/3;
  19.     z=(15-3*a+5*b)/9;
  20.  
  21.     a=x;
  22.     b=y;
  23.     c=z;
  24. end
  25.  
  26. fprintf("x=%.3f ,y=%.3f ,z=%.3f ",x,y,z);
  27.  
  28. X=[a;b;c];
  29. err=abs(S-X)
Success #stdin #stdout 0.11s 47576KB
comments (?)
stdin 
Standard input is empty
stdout 
x=2.108 ,y=4.675 ,z=4.568 err =

   0.99368
   1.10379
   1.95148
https://ideone.com/nfOKK9
language:
Octave (octave 4.4.1)
created:
6 days ago
visibility:
public

Share or Embed source code

Discover > Sphere Engine API

The brand new service which powers Ideone!

Discover > IDE Widget

Widget for compiling and running the source code in a web browser!