function compare():integer;
var
j:integer;
begin
j:=0;
while(s1[j+1]=s2[j+1]) do j:=j+1;
compare:=j;
end;
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
| Roma |
Сообщение
#1
|
|
Гость |
Можно ли узнать сколько первых N символов равно в двух массивах, быстрее чем такой функцией:
Код function compare():integer; var j:integer; begin j:=0; while(s1[j+1]=s2[j+1]) do j:=j+1; compare:=j; end; |
![]() ![]() |
| roma |
Сообщение
#2
|
|
Гость |
Цитата(virt @ 5.11.2005 22:41) дихотомией. А что это такое? |
Roma Сравнение массивов. 5.11.2005 18:23
volvo Можно... Вот такой:
function compare:integer;
var
… 5.11.2005 18:25
Roma Ээ... Я имел ввиду что-то кардинально другое. 6.11.2005 2:22
Altair
нет ни слова о кардинальности изменений ;) 6.11.2005 2:27
virt дихотомией. 6.11.2005 2:41
Guest А, понял что это. Но как это применить к массиву. 6.11.2005 3:03
Altair ИМХО дихотомия не уместна.
И приведенный алгоритм … 6.11.2005 3:18
volvo To: virt
А потом сравним быстродействие на нескол… 6.11.2005 3:19
virt если в массивах совпадений больше чем log2n то дих… 6.11.2005 14:22
Altair Все братцы, или коды с замером времени выполнения,… 6.11.2005 15:01
Roma А может кто-нибудь написать как сравнивать массивы… 6.11.2005 15:52
virt не получится дихотомией ,я неверно понял условие. 6.11.2005 16:23
Roma Жаль... 6.11.2005 16:30![]() ![]() |
|
Текстовая версия | 23.11.2025 4:48 |