Question

编写程序 使用如下公式求自然常数E的近似值 知道累加项1/N!<1O的-4次方为止 E=1+1/1! +1/2! +1/3!+...+1/N

编写程序
使用如下公式求自然常数E的近似值 知道累加项1/N!<1O的-4次方为止
E=1+1/1! +1/2! +1/3!+...+1/N!

Answer 1

C语言算法描述。将该公式看成求N项和公式。定义三个变量：1、i（为int），用来记分项的序号；2、用变量temp表示分子值（为long）；3、用变量sum表示前N项和（为double).
程序如下：
void main(){
int i=1;
long temp=1;
double sum=1.;
for(;1.0/temp<1e-4;){
sum=sum+1/temp;
i=i+1;
temp=temp*i;
}
printf("E=%lf",sum);
}

Answer 2

pascal语言
var
k:longint;
e,t:extended;

function(x:longint):longint;
var
i:longint;
ans:int64;
begin
ans:=1;
for i:=1 to x do ans:=ans*i;
end;

begin
k:=1;
e:=1;
repeat
t:=1/f(k);
e:=e+t;
until t<1e-4;
writeln(e);
end.

Answer 3

rjdfkg;asjqds