Вычислить 1/1! + 1/3!+1/5! + … + 1/(2*N-1)! для N=11 — Pascal(Паскаль)

uses crt;
var s,f:real;
    i,j:byte;
begin
clrscr;
s:=0;
for i:=1 to 11 do
 begin
  f:=1;
  for j:=1 to 2*i-1 do
  f:=f/j;
  s:=s+f;
 end;
write('Summa=',s:0:4);
readln
end.

Leave a Comment

+ 21 = 22