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

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

Question

Информатика

Настюня

26 июля, 19:50

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

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

+3

Ответы (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.