Maximalniho prvku pole

[Honza Pazdziora]

On Fri, 10 Dec 1999 19:05:36 GMT, Roztocil Bohuslav <Bohuslav.Roztocil na tconsult.cz> wrote:
> A co tohle?
> 
>   my @x = qw(1 2 3 4 5 6 9 8 5 1 223 -5 6 44 -58);
>   my $max = (sort {$b <=> $a} @x)[0];
> 
> Kupodivu "funguje" i pro
> 
>   @x = @x = qw(1 2 3 4 5 6 9 judita 8 5 1 223 -5 6 44 -58 albert);

Jo, to jo. Ale na tomhle je o(log n) casove a nejmin o(n) prostorove
navic, nez kdyz se udela normalni linearni pruchod. Ale ano, cyklus
tam neni ;-)

-- 
------------------------------------------------------------------------
 Honza Pazdziora | adelton na fi.muni.cz | http://www.fi.muni.cz/~adelton/
   .project: Perl, DBI, Oracle, MySQL, auth. WWW servers, MTB, Spain.
------------------------------------------------------------------------