%
% Cálculo del factorial de un número natural.
%

n = input('Entre el número n: ');

if (n < 0)
   fprintf('n debe ser positivo o cero.\n');
   return;
else
  if (n == 0)
    fact = 1;
  else
    fact = 1;
    fprintf('       i       fact\n');
    for i = 2:n
      fprintf('LAZO: %5d %8d', i, fact);
      fact = fact * i;
      fprintf('   Dsp = %8d\n', fact);
    end
  end
end

fprintf('\nEl factorial de %d es %d\n', n, fact);

