function bc=bincoeff(n,k)
%BINCOEFF Calcola il coefficiente binomiale.
%   BC=BINCOEFF(N,K) calcola il coefficiente
%   binomiale n su k come richiesto 
%   dall'Esercizio 1.11.
%
%   Si veda anche NCHOOSEK.

%   Saleri Fausto 05-02-01

k = fix(k); 
n = fix(n);
if k > n 
  disp('k deve essere compreso fra 0 e n'); 
  break; 
end
if k > n/2 
  k = n-k; 
end
if k <= 1  
  bc = n^k; 
else
  num = (n-k+1):n; 
  den = 1:k; 
  el = num./den; 
  bc = prod(el);
end

return     

