Помогите пожалуйста написать простенькую программу в Паскаль(цикл с параметром) Задание: Вычислить сумму ряда до n количества зн
Помогите пожалуйста написать простенькую программу в Паскаль(цикл с параметром) Задание: Вычислить сумму ряда до n количества значений: s=1-1/1+1/3-1/5+.......
{s=1-1/1+1/3-1/5+.....} var i,n,z:integer; s: real; begin writeln('Введите n'); readln(n); s:=1; z:=1; for i:=1 to n-1 do begin z:=z*(-1); s:=s+z/(2*i-1); end; writeln(s); end.