%% prog 014 sumatoria y factorial
clearvars;
close all;
clc;

%este programa calcula la sumatoria y el factorial de N
%sumatoria = 1 + 2 + 3 +...+ N
%factorial = 1 * 2 * 3 *...* N
%usando el ciclo for y mediante variables de caracter acumulativo
%es decir variables que van cambiando con cada ciclo

% lectura 
N = input('N = ');

%% sumatoria
sumatoria1 = 0;   %comenzamos con el neutro de la suma
for n = 1:N
    sumatoria1 = sumatoria1 + n;
end;

%% factorial
factorial1 = 1;   %comenzamos con el neutro de la multiplicacion
for n = 1:N
    factorial1 = factorial1*n;
end;

fprintf('sumatoria1 = %d factorial1 = %e\n',sumatoria1,factorial1);

%% podemos hacer esto en un ciclo for solamente
sumatoria2 = 0;   %comenzamos con el neutro de la suma
factorial2 = 1;   %comenzamos con el neutro de la multiplicacion
for n = 1:N    
    sumatoria2 = sumatoria1 + n;
    factorial2 = factorial2*n;
end;

fprintf('sumatoria2 = %d factorial2 = %e\n',sumatoria2,factorial2);