Определить максимальную сумму смежных элементов последовательности

@людмила1234 · Регистрация: 27.12.2018

Студворк — интернет-сервис помощи студентам

На вход программы подается натуральное число N, а затем N целых чисел.
Необходимо определить максимальную сумму смежных элементов последовательности. N не превышает 1000, каждый элемент последовательности не превосходит по модулю 100
Пример входных данных:
9
-2
1
-3
4
-1
2
1
-5
4
Пример выходных данных:
6

@ZX Spectrum-128 · 30.12.2019, 17:11

Сообщение от людмила1234

смежных элементов

Что это такое?

@людмила1234 · 31.12.2019, 15:41 **[ТС]**

написать программу

@Puporev · 31.12.2019, 16:02

Спрашивают что такое смежные элементы? Если 2 рядом стоящие, то максимальная сумма в примере равна 7, 9+(-2), а суммы=6 вообще нет.

@ZX Spectrum-128 · 31.12.2019, 16:02

Сообщение от людмила1234

написать программу

Это понятно. Что такое смежные элементы?

@ProMix0 · 02.01.2020, 09:40

Сообщение от Puporev

максимальная сумма в примере равна 7, 9+(-2)

9 это N. Правда, у меня максимальная сумма равна 3, а не 6

@Puporev · 02.01.2020, 09:43

Понял, а вы решили задачу?

@ProMix0 · 02.01.2020, 09:48

Я даже не знаю условия

@Puporev · 02.01.2020, 09:49

Пардон, я подумал что ТС написал.

@JuriiMW · 02.01.2020, 14:07

Сообщение от ProMix0

у меня максимальная сумма равна 3, а не 6

Ну, дык, вот же: 4+(-1)+2+1

Решение такое:

Pascal
1
2
3
4
begin
  var n:=ReadInteger; var a:=ReadArrInteger(n);
  2.to(n).Max(L->0.to(n-L).Max(S->a[S:S+L].Sum)).Print;
end.

Что скрыто за строкой 3:

Pascal
1
2
3
4
5
6
7
8
begin
  var n:=ReadInteger; var a:=ReadArrInteger(n);
  var maxSum := 0;
  for var L := 2 to n do
    for var S := 0 to n-L do
      maxSum := max(maxSum, a[S:S+L].Sum);
  maxSum.Print;
end.

@людмила1234 · 09.01.2020, 22:43 **[ТС]**

что такое a[S:S+L].Sum

@Sun Serega · 09.01.2020, 23:54

Срез массива. Забейте в указатель справки слово "срез".

@ProMix0 · 10.01.2020, 07:59

Сообщение от JuriiMW

4+(-1)+2+1

А что, смежные элементы это не два соседних числа?

@JuriiMW · 10.01.2020, 08:24

ProMix0, в гугле забанили?
Наберите поисковую строку „что такое смежные“ и будет вам счастье…

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Desktop (MinGW): Рисуем цветные прямоугольники с помощью рисовальщика SDL3 на Си и C++ 8Observer8 17.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-rectangles-sdl3-c. zip finish-rectangles-sdl3-cpp. zip	Символические и жёсткие ссылки в Linux. algri14 15.03.2026 Существует два типа ссылок — символические и жёсткие. Ссылка в Linux — это запись в каталоге, которая может указывать либо на inode «файла-ИСТОЧНИКА», тогда это будет «жёсткая ссылка» (hard link),. . .	[Owen Logic] Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ФедосеевПавел 14.03.2026 Поддержание уровня воды в резервуаре количеством включённых насосов: моделирование и выбор регулятора ВВЕДЕНИЕ Выполняя задание на управление насосной группой заполнения резервуара,. . .	делаю науч статью по влиянию грибов на сукцессию anaschu 13.03.2026 прикрепляю статью
SDL3 для Desktop (MinGW): Создаём пустое окно с нуля для 2D-графики на SDL3, Си и C++ 8Observer8 10.03.2026 Содержание блога Финальные проекты на Си и на C++: hello-sdl3-c. zip hello-sdl3-cpp. zip Результат:	Установка CMake и MinGW 13.1 для сборки С и C++ приложений из консоли и из Qt Creator в EXE 8Observer8 10.03.2026 Содержание блога MinGW - это коллекция инструментов для сборки приложений в EXE. CMake - это система сборки приложений. Здесь описаны базовые шаги для старта программирования с помощью CMake и. . .	Как дизайн сайта влияет на конверсию: 7 решений, которые реально повышают заявки Neotwalker 08.03.2026 Многие до сих пор воспринимают дизайн сайта как “красивую оболочку”. На практике всё иначе: дизайн напрямую влияет на то, оставит человек заявку или уйдёт через несколько секунд. Даже если у вас. . .	Модульная разработка через nuget packages DevAlt 07.03.2026 Сложившийся в . Net-среде способ разработки чаще всего предполагает монорепозиторий в котором находятся все исходники. При создании нового решения, мы просто добавляем нужные проекты и имеем. . .

@людмила1234 0 / 0 / 0 Регистрация: 27.12.2018 Сообщений: 28

	Определить максимальную сумму смежных элементов последовательности 30.12.2019, 17:06. Показов 4410. Ответов 13 Метки нет (Все метки) На вход программы подается натуральное число N, а затем N целых чисел. Необходимо определить максимальную сумму смежных элементов последовательности. N не превышает 1000, каждый элемент последовательности не превосходит по модулю 100 Пример входных данных: 9 -2 1 -3 4 -1 2 1 -5 4 Пример выходных данных: 6 0

@людмила1234 0 / 0 / 0 Регистрация: 27.12.2018 Сообщений: 28
	31.12.2019, 15:41 [ТС]
	написать программу 0

@Puporev Почетный модератор 64315 / 47611 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	31.12.2019, 16:02
	Спрашивают что такое смежные элементы? Если 2 рядом стоящие, то максимальная сумма в примере равна 7, 9+(-2), а суммы=6 вообще нет. 0

@Puporev Почетный модератор 64315 / 47611 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	02.01.2020, 09:43
	Понял, а вы решили задачу? 0

@ProMix0 80 / 33 / 10 Регистрация: 14.06.2019 Сообщений: 516
	02.01.2020, 09:48
	Я даже не знаю условия 0

@Puporev Почетный модератор 64315 / 47611 / 32743 Регистрация: 18.05.2008 Сообщений: 115,167
	02.01.2020, 09:49
	Пардон, я подумал что ТС написал. 0

@людмила1234 0 / 0 / 0 Регистрация: 27.12.2018 Сообщений: 28
	09.01.2020, 22:43 [ТС]
	что такое a[S:S+L].Sum 0

@Sun Serega 2355 / 1458 / 526 Регистрация: 07.04.2017 Сообщений: 4,798
	09.01.2020, 23:54
	Срез массива. Забейте в указатель справки слово "срез". 0

@JuriiMW 5095 / 2661 / 2355 Регистрация: 10.12.2014 Сообщений: 10,060
	10.01.2020, 08:24
	ProMix0, в гугле забанили? Наберите поисковую строку „что такое смежные“ и будет вам счастье… 0