Дано целое число n (> 1) и набор из n чисел. найти максимальную сумму двух соседних чисел из данного набора.10 минут

Ответ:

TASHER228YMM

14.07.2020 21:49

Uses crt;
const n = 5;
var a:array[1..n] of integer;
i,max:integer;
begin
for i:=1 to n do
readln(a[i]);
max = a[1]+a[2];
for i:=1 to n-1 do
if (a[i]+a[i+1] > max) then
max:= a[i]+a[i+1];
writeln(max);
end.

0,0(0 оценок)

Ответ:

HOHLOFF

14.07.2020 21:49

Готово

0,0(0 оценок)

Популярные вопросы: Информатика

милка1523

09.02.2023 02:38

Как можно ограничить активность переписки в социальной сети и мессенджерах? ты можешь выбрать несколько ответов. 1.завести отдельный аккаунт для близких и родных и аккаунт...

silonte

13.09.2022 17:43

Умоляю очень нужно сделать . От Нужно выполнить задания в паскали и нарисовать блок схемы ....

khokhr

10.05.2021 02:10

Контролка! у меня спорная, hellp, жалко! составьте таблицу истинности логической функции f=(-x& ¬y)...

Anonim654321

21.08.2020 14:32

Если информация имеет объём 14 мегабайт Определите её объём в битах байтах килобайтах...

voytyukk

26.08.2021 23:12

Устройство компьютера обязательные и другие...

nikolay946

26.08.2021 23:12

Каков объем видеопамяти? а) 1,4 мбайт в) 938 кбайт б) 1,5 мбайт г) 2,25 мбайт...

Regina13579

26.08.2021 23:12

Напишите программу, которая вычисляет следующее значение. по теореме пифагора, в прямоугольном треугольнике соотношение сторон c2=a2+b2. если a=3, b=2, каково значение...

итлиори

12.08.2020 09:28

Скаких дисков информация считывается при лазерного луча? *...

carinakulebaki64356

21.05.2023 11:17

Найдите ошибку: much people go to south in august....

harvey2

21.05.2023 11:17

Игрушечная пушка может скользить без трения по горизонтальным рельсам, не отрываясь от них. тангенс угла наклона ствола к горизонту равен 4/5. отношение массы пушки (без...

Полный доступ

Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку