Question

Составте программу для вычисления суммы -10 до 5

Answer 1

PascalABC.net

var s:integer;

begin

s:=0;

for i:=-10 to 5 do s:=s+i;

write(s);

end.