|
ru.algorithms
- RU.ALGORITHMS ----------------------------------------------------------------
From : Sergiy Kanilo 2:5020/400 08 Mar 2002 07:50:44
To : Serg Belyaev
Subject : Re: поиск подмассива с максимальной суммой элементов
--------------------------------------------------------------------------------
"Serg Belyaev" <svb@sandy.ru> wrote in message
news:a60407$2dhl$1@news.gamma.ru...
> U> Есть одномерный массив чисел. Hадо найти последовательность (начальный
и
> U> конечный индексы) элементов дающих максимальную сумму элементов среди
> U> всех других последовательностей.
[snip]
> Hиже приведен вариант решения (для сравнения с вашим)
[snip]
> begin
> <ввод исходных данных>
> smax:=x[1];i:=1;j:=1;
Если допустима пустая последовательность, и сумму
пустой последовательности можно считать нулем, то
smax следует инициализировать нулем. Hу и
скорректировать начальные границы, соответственно.
> ii:=1;s:=0;
> for k:=1 to n do begin
> s:=s+x[k];
> if s>smax then begin smax:=s;i:=ii;j:=k end;
> if s<0 then begin s:=0;ii:=k+1 end;
> end;
> <вывод результата>
> end.
Cheers,
Serge
--- ifmail v.2.15dev5
* Origin: Giganews.Com - Premium News Outsourcing (2:5020/400)
Вернуться к списку тем, сортированных по: возрастание даты уменьшение даты тема автор
|
