Lista 03a - DCC/UFMG

N = input('Entre com o valor de N: ');SOMA = 0;for I = 0 : NFATN = 1;for J = 2 : N - IFATN = FATN * J;endFATD = 1;for J = 2 : (2 * I)FATD = FATD * J;endR = FATN / FATD;if (mod(I, 2) == 0)fprintf(1,'%do. Termo = %4.10f\n',I+1,R);SOMA = SOMA + R;elsefprintf(1,'%do. Termo = - %4.10f\n',I+1,R);SOMA = SOMA - R;endendfprintf(1,'Soma = %f\n',SOMA);N = input('Entre com o valor de N: ');SOMA = 0;FATN = 1;FATD = 1;for J = 2 : NFATN = FATN * J;endfor I = 0 : NR = FATN / FATD;if (mod(I, 2) == 0)fprintf(1,'%do. Termo = %4.10f\n',I+1,R);SOMA = SOMA + R;elsefprintf(1,'%do. Termo = - %4.10f\n',I+1,R);SOMA = SOMA - R;endif (I ~= N)FATN = FATN / (N - I);endFATD = FATD * ( 2*I + 1 ) * ( 2*I + 2);endfprintf(1,'Soma = %f\n',SOMA);UFMG – ICEx – DCC – Programação de Computadores – 2º. Sem 2005 – David Menoti 64