Page History

function y = fact(x)
    if x>1
        y= fact(x-1)*x;
    else
        y=1;
    end
end

function f = fibnum(n)
    if n <= 1
        f = 1;
    else
        f = fibnum(n-1) + fibnum(n-2);
    end
end 

function p = pascal(n)
    if n == 1
       p = [1];
    else
       p = [1];
       forrige_linje = pascal(n-1);
       for i=1:(length(forrige_linje)-1)
           p = [p (forrige_linje(i)+forrige_linje(i+1))];
       end
       p = [p 1];
    end
end 

function p = palindromTest(ord)
    if length(ord) == 1 || length(ord) == 0
        p = 1;
    else
        if ord(1) == ord(length(ord)) && palindromTest(ord(2:(length(ord)-1)))
            p = 1;
        else
            p = 0;
        end
    end
end

function y = ten_exp(n)
    if n == 0
        y = 1;
    else
        y = 10 * ten_exp(n-1);
    end
end