Дано натуральное число n. Вычислить: S=1-1/2+1/4-1/8+...+(-1)^n*1/2^n. Составить программу в 3-х циклах (постусловие, предусловие, цикл с параметром) задание 3

а на питоне сможешь сделать ?

1)var n,i,d,z:integer; s:real;beginreadln(n);s:=1; d:=1; z:=1; i:=1;repeat i:=i+1; d:=d*2; z:=-z; s:=s+z/d;until i>=n;writeln('s = ',s);end.2)var n,i,d,z:integer; s:real;beginreadln(n);s:=1; d:=1; z:=1; i:=1;while i<n do begin i:=i+1; d:=d*2; z:=-z; s:=s+z/d; end;writeln('s = ',s);end.3)var n,i,d,z:integer; s:real;beginreadln(n);s:=1; d:=1; z:=1;for i:=2 to n do begin d:=d*2; z:=-z; s:=s+z/d; end;writeln('s = ',s);end.Пример:5s = 6.875000000000000e-01