function y=faktorial(n)
%leitakse arvu n faktoriaal
faktoriaal=1;
for i=2:n
    faktoriaal=faktoriaal*i;
end
faktoriaal