Cоставьте, пожалуйста, программу на паскале суммы ряда (далее вложение)
Приложения:
Ответы на вопрос
Ответил Аноним
0
Var
y:real;
n:integer;
Begin
y:=0;
For n:= 4 to 20 do
y:=y+1/(n+1);
WriteLn('y = ',y);
End.
y:real;
n:integer;
Begin
y:=0;
For n:= 4 to 20 do
y:=y+1/(n+1);
WriteLn('y = ',y);
End.
Ответил Евгеняч
0
cпасибо большое, нашла свою ошибку:))
Новые вопросы