Составить программу в Паскале и блок схему:

Вычисление суммы ряда S=1-1/2+1/4-1/6 + ... 1/N.

Question

Информатика

Анастасия

6 января, 05:11

Составить программу в Паскале и блок схему:

Вычисление суммы ряда S=1-1/2+1/4-1/6 + ... 1/N.

+5

Ответы (1)

Знаете ответ на вопрос?

Эладка · Answer 1

Вот держите:

var n, i, l, m:integer; sum:real;

begin

readln (n) ;

sum:=1; l:=1;

while mn do begin

m:=m+2;

sum:=sum - ((1/m) * l) ;

l:=l*-1;

end;

writeln (sum) ;

end.

Составить программу в Паскале и блок схему:Вычисление суммы ряда S=1-1/2+1/4-1/6 + ... 1/N.

Составить программу в Паскале и блок схему:

Вычисление суммы ряда S=1-1/2+1/4-1/6 + ... 1/N.