Вопрос определите что будет напечатано в результате выполнения программы

[leh]

var s,k: integer;
begin
s:=0;
for k:=-72 to 74 do
s:=s+k;
writen(s)
end

 

[shopf22]

Зайди на ideone.com, выбери язык паскаль и узнай 147

 

[vizy]

В результате выполнения программы будет напечатано значение переменной s