Var s,k: integer;
begin
s := 8;
for k := 3 to 8 do
s := s + 8;
writeln(s);
end.

lera08862    2   26.04.2020 11:26    0