Ссоставлением алгоритма, ! дана последовательность, общий член которой определяется формулой: an = (n-1)/n^2. вычислите сумму тех её членов, которые больше заданного числа e при n> =2

sirius830 sirius830    1   04.07.2019 07:40    11

Ответы
matvee1 matvee1  28.07.2020 01:22
Var S,E:real;
N:integer;
Begin
Write('E = ');ReadLn(E);
N:=2;
S:=0;
While (N-1)/(N*N)>E do
 Begin
 S:=S+(N-1)/(N*N);
 N:=N+1
 End;
WriteLn(S)
End.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика