var
  range, totalrange: real;
  i: integer;

begin
  range := 2;
  totalrange := 2;
  for i := 1 to 9 do
  begin
    range := range + ((range / 100) * 12);
    totalrange := totalrange + range;
  end;
  writeln('Суммарный путь = ', totalrange, ' км');
end.