Определите, что будет напечатано в результате работы следующей программы.
var s, k:integer;
begin
s:= 1;
for k:= 1 to 7 do
s:= s + k;
writeln \(s\);
end.