 function[wynik]=silnia(n)
 wynik=1;
 for i=1:n
 wynik=wynik*i;
 end