Guest User

Untitled

a guest
May 20th, 2018
140
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
MatLab 0.40 KB | None | 0 0
  1. function gausseseidel(A,B,x0)
  2.  x=x0;
  3.  len=length(A);
  4. for i=1:10
  5.     for j=1:len
  6.         sum=0;
  7.         for k=1:len
  8.             if(k==j)
  9.             else
  10.                 sum=sum+A(j,k)*x(k);
  11.             end
  12.         end
  13.         x(j)=(1/A(j,j))*(B(j)-sum);
  14.        fprintf('i:%d ',i);
  15.        for k=1:len
  16.            fprintf('x%d:%d ',k,x(k));
  17.        end
  18.        fprintf('\n');
  19.     end
  20. end
  21. end
Add Comment
Please, Sign In to add comment