[pirsddd]

В чём разница? Какой код быстрее?

Код:

function SSS1(S: string): Char;
begin
  Result := S[1];
end;

function SSS2(const S: string): Char;
begin
  Result := S[1];
end;