clc;
clear all;
A=input ('masukkan matriks:');
m = length (A);
for k = 1:m
for i = k+1 :m
faktor=A(i,k)/A(k,k);
for j =1:m
A(i,j)=A(i,j)- (faktor*A(k,j));
end
A
end
end
disp(A);
det =1;
for i=1:m
det=det*A(i,i);
end
fprintf('determinan A=%f\n', det);
Tidak ada komentar:
Posting Komentar