Переведем левую часть в килобайты:
8^х бит - это 1^х байт; либо же 1024^х кбайт.
1024^х кб=32 кб
х=1/2.
Easy!
function Trim(s:string):string;
begin
delete(s,1,1);
delete(s,length(s),<span>length(s)</span>);
result:=s;
end;
Sr=4,5..........................................................................
...............................................................................
...............................................................................
...............................................................................
...............................................................................
...............................................................................
...............................................................................