Определите, что будет написано в результате работы следующей программы:

Var s, k: integer:

Begin

s:-1;

for k:-1 to 4 do

s-s+2+k;

write (s) ;

End.

В данной программе присутствуют ошибки, поэтому для начала исправим ошибки в коде программы:

Var s, k: integer;

Begin

s:=-1;

for k:=-1 to 4 do

s:=-s+2+k;

write (s) ;

End.

Теперь можно через программу Pascal ABC запустить данный код. Pascal ABC вывел нам число 2. Поэтому ответом будет являться число 2.

Ответ: 2.