%coefbin.m
%coefficienti binomiali
n=5;
ft(1)=1;
for i=2:n
    ft(i)=ft(i-1)*i;
end
cb(1)=1;
for i=1:n-1
    cb(i+1)=ft(n)/(ft(i)*ft(n-i));
end
cb(n+1)=1;
x=[0:1:n];
bar(x,cb)