Запишите значение переменной s, полученное в результате работы программы.
Var s, i: integer;
Begin
s := 100;
for i := -5 to 5 do
s := s - 7 ;
writeln(s);
End.