Lista 03a - DCC/UFMG

54) Implementar um algoritmo para calcular o valor de e x . O valor de X deverá serdigitado. O valor de será calculado pela soma dos 15 primeiros termos da série aseguir:e x2x= 1+x +2!3x+3!4x+4!+ ...algoritmo L3P054;varinteiro: I, J, FAT;real: X, E;inícioE ← 0;leia(X);para I de 1 até 15 façaFAT ← 1;para J de 2 até I – 1 façaFAT ← FAT * J;fim-paraE ← E + ( X ** ( I – 1 ) ) / FAT;fim-paraimprima("E^",X," = ",E);fimalgoritmo L3P054B;varinteiro: I, FAT;real: X, E;inícioFAT ← 1;COS ← 0;leia(X);para I de 1 até 15 façaE ← E – ( X ** ( I – 1 ) ) / FAT;FAT ← FAT * I;fim-paraimprima("E^",X," = ",E);fimprogram l3p054;varI, J: integer;X, E, FAT, XE: real;beginwriteLn('Exp(x)');write('Digite um valor para X: ');read(X);E := 0;XE := 1;for I := 1 to 15 dobeginFAT := 1;for J := 2 to I - 1 doFAT := FAT * J;E := E + XE / FAT;XE := XE * X;end;writeLn('Exp(',X:5:4,') = ',E:9:8);writeLn('Exp(',X:5:4,') = ',Exp(X):9:8);end.UFMG – ICEx – DCC – Programação de Computadores – 2º. Sem 2005 – David Menoti 60