Cоставьте, пожалуйста, программу ** паскале суммы ряда (далее вложение)

Question

Cоставьте, пожалуйста, программу на паскале суммы ряда (далее вложение)

---

Answer 1

Var
y:real;
n:integer;
Begin
y:=0;
For n:= 4 to 20 do
    y:=y+1/(n+1);
WriteLn('y = ',y);
End.

Comments

cпасибо большое, нашла свою ошибку:))