|
|
ru.algorithms- RU.ALGORITHMS ---------------------------------------------------------------- From : Alexander Chelmodeev 2:5062/17.5 28 Dec 2002 16:34:31 To : Alex Kozhushko Subject : Ускорение поиска максимума... -------------------------------------------------------------------------------- 27 Дек 2002 Пт в 13:45 : Alex Kozhushko --> Alexander Chelmodeev: AC>> Вот совсем без сравнений: ;) AC>> max:=ar[0]; AC>> min:=ar[0]; AC>> for n:=1 to high(ar) do AC>> begin AC>> max:= (max+ar[n] + Abs(max-ar[n])) div 2 ; AC>> min:= (min+ar[n] - Abs(min-ar[n])) div 2 ; AC>> end; AK> Поскольку на каждом шаге цикла хотя бы одно неявное сравнение есть - AK> как считать сравнения? :-) Hикак, их здесь - 0 ;) Если подозреваешь на сравнение ф-ю Abs, то - зависит от реализации Abs. ... http://ichip.rbcmail.ru ... mailto: ichip(a)rbcmail.ru --- GoldED+/386 1.1.5-20010807 rev.0813 (MS-DOS 7.10 pc) * Chip&Deal * * Origin: Вы мoжете иметь пивo публичнo. (2:5062/17.5) Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
Архивное /ru.algorithms/147063e0dc532.html, оценка из 5, голосов 10
|