Question

var s, k:integer;
begin
s:= 1;
for k:= 1 to 7 do
s:= s + k;
writeln (s);
end.
Какой ответ?

Answer 1

Ответ 29
======================