program project1;

{$mode objfpc}{$H+}

Var
  LOut : array of Byte;
  LLength, LSSize : integer;
begin
  SetLength(LOut, 1+LLength+1+4+4+2+4+4+2+LSSize+2);
end.