составить программу для определения суммы чисел:
-5, -1, 3, ....., 27.

var sum, i: integer;begini:=-5; sum:=0;while i<=27 do beginsum:=sum+i;i:=i+4;end;writeln(sum);end.