Составить программу в pascal..дано натуральное число n. найти сумму s=1+1/2+1/3+1/+1/(2n+1).

Question

Информатика: Составить программу в pascal..дано натуральное число n. найти сумму s=1+1/2+1/3+1/+1/(2n+1).

anastasy7 · Answer

Var i, n: integer;      s: real;begin  write( Введите N: ); readln(n);  for i := 0 to n do s := s + (1 / (2*i + 1));  writeln( S = , s);end....