function B = pascal(A)
    n = length(A);
    B = zeros(1,n+1);  % optimalisering, kan droppes

    B(1) = 1;
    for i = 2:n  % godta forskjellige tellere for A og B
        B(i) = A(i) + A(i-1);
    end
    B(n+1) = 1;
end