WUT_Computer_Science/ENUME/references/MNUM/Projekt1/Zadanie2/backwardSubstitution.m

function [x] = backwardSubstitution(A,b)
    m = length(b);                                      %wyłuskanie ostatniego indeksu
    x(m,1) = b(m)/A(m,m);                               %wyliczenie ostatniego elementu
    for i = m-1:-1:1                                    %iteracja po wszystkiech równaniach poczšwszy od przedostatniego wiersza
        x(i,1)=(b(i)-A(i,i+1:m)*x(i+1:m,1))./A(i,i);    %wyznaczenie niewiadomych
    end
end