Используя язык программирования pascal, написать программу, которая вычисляет следующую сумму S= (2*4)/(1+2)-(6*8)/(2+3)+(10*12)/(3+4)-...-(54*56)/(14+15) и выводит ее результат.
Писать нужно через цикл, желательно, с пояснением.

var i,z:integer; a,s:real;begins:=0; z:=-1;for i:=1 to 56 div 4 do begin z:=-z; a:=z*(i*4-2)*(i*4)/(i+i+1); // для наглядности: writeln(z,' ',i*4-2,' ',i*4,' ',i,' ',i+1); s:=s+a; end;writeln('s = ',s);end.Результат:1 2 4 1 2-1 6 8 2 31 10 12 3 4-1 14 16 4 51 18 20 5 6-1 22 24 6 71 26 28 7 8-1 30 32 8 91 34 36 9 10-1 38 40 10 111 42 44 11 12-1 46 48 12 131 50 52 13 14-1 54 56 14 15s = -54.4163713045239