program eliminasi gaussian dengan matlab

ni program eliminasi gaussian dengan matlab :

function x=gaussian(A,b);

n=length(b);

x=zeros(n,1);

for k=1:n-1

for i=k+1:n

m=A(i,k)/A(k,k);

for j=k:n

A(i,j)=A(i,j)-m*A(k,j);

end

b(i)=b(i)-m*b(k);

end

end

%solusi

x(n)=b(n)/A(n,n);

for i=n-1:-1:1

for j=i+1:n

b(i)=b(i)-A(i,j)*x(j);

end

x(i)=b(i)/A(i,i);

end

atau untuk lebihnya silahkan download file ini

download