Creato algoritmi di risoluzione sistemi lineari mediante metodo di gauss con pivoting parziale

This commit is contained in:
2014-10-07 13:35:34 +02:00
parent 11a9605c45
commit 85ff9aa1d0
4 changed files with 169 additions and 0 deletions

View File

@@ -0,0 +1,20 @@
%risoluzione matrice triangolare superiore con algoritmo
% di sostituzione botton up (all'indietro)
U=[2,2,4;0,-7,-11;0,0,2];
b=[5;-8;-2];
x=[];
n= length(b);
x(n) = b(n)/U(n,n);
for i=n-1:-1:1
somma = 0;
for k=i+1:n
somma=somma+U(i,k) * x(k);
end
x(i) = (b(i) - somma)/ U(i,i);
end
disp ('La soluzione <EFBFBD> ')
x