Помогите пожалуйста с задание по информатике на написание программы в Паскаль:
Найти сумму ряда
1-2+3-4+5-...+56

Можешь пожалуйста через while

var i,s:integer;begins:=0; i:=0;while i<56 do begin i:=i+1; if i mod 2=1 then s:=s+i else s:=s-i; end;writeln('s = ',s);end.

Огромное спасибо тебе!!!!!!❤️❤️❤️