Question

Помогите! На этой тебе болела и не поняла) Буду должна)
begin
s:=0;
for i:= -4 to 1 do
s:= s+i;
writeln (s);
end.

Answer 1

var i,s:integer;
begin
s:=0;
for i:= -4 to 1 do
s:= s+i;
writeln (s);
end.
Находится сумма  цикла состоящий из чисел от -4 до 1, с шагом 1, ответ -9.