function y=faktoriaal(x)
%leitakse etteantud arvu faktoriaal
vastus=1;
for i=2:x
    vastus=vastus*i;
end
vastus