Сравнение массивов., Количество одинаковых символов. Опции

[Roma]

Можно ли узнать сколько первых N символов равно в двух массивах, быстрее чем такой функцией:

Код

function compare():integer;
var
j:integer;
begin
j:=0;
while(s1[j+1]=s2[j+1]) do j:=j+1;
compare:=j;
end;

[Altair]

ИМХО дихотомия не уместна.
И приведенный алгоритм наиболее быстр.