Podstawianie W Przód

1

2

3

4

5

6

7

8 9

10

11

function x=ForwardS (A,b) %funkcja pobiera rr.acierz A i wektor wyrazów wolnych b, a zwraca wektor rozwiązań x n=size(A); %pobranie rozmiaru macierzy A

Rfor i= :n %pętla po wierszach

3=0;

R for j=l:l:i-l %pętla po kolumnach (elementy nie należące do przekątnej) s=s+A(i,j)*x(j); %sumowanie elementów o znznych V7artcścrach

end

x(i)=(b(i)-s)/A(i,i); %cbliczenie i-tego argumentu

end

end