jacobi methods for matlab

yg ini ngpain lg??hha narsis aeehh

nggak2 kali ini sy mau memberi rumus metode jacobi dlm matlab untuk mencari akar sistem persamaan linier..yuuukk mariii dliad semoga brmanfaat

%matriks-metode jacobi
Clc;
n=input(‘ordo matriks : ‘);
for i=1:n
for j=1:n
a(i,j)=input(sprintf(‘A(%d, %d)=’,i,j));
end
end
A=a
For k=1:n
B(k)=input(sprintf(‘B(%d)=’,k));
End
B=b’
For i=1:n
For j=1:1
X(i,j)=input(sprintf(‘nilai awal x(%d %d)=’,i,j));
End
X=x’
%jacobi
K=1;
S=1;
While abs (s)>0.00001
For i=1:n
Jum=0;
For j=1:n
If (j~=i)
Jum=jum+a(i,j)*x(j,k);
End
End
C=jum;
X(i,k+1)=(b(i)-jum)/a(i,i);
s=(x(i,k+1)-x(i,k))/x(i,k+1);
h=x(:,k+1);
end
fprintf (‘%d %f %f %f\n’,k,h’)
k=k+1;
end

kalo ad yg salah huruf besar kecilnya maap yyaa..hho