Var s, k:integer;

[email protected] в категроии Информатика, вопрос открыт 25.04.2017 в 18:24

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