Нахождение и вывод пары с наименьшей суммой среди непересекающихся пар соседних элементов - PascalABC.NET

Формулировка задачи:

Дан целочисленный массив из 40 элементов. Элементы массива могут принимать целые значения от –10 000 до 10 000 включительно. Опишите на русском языке или на одном из языков программирования

алгоритм, который находит и выводит пару с наименьшей суммой среди

непересекающихся пар

соседних элементов

. То есть, первая пара

1-й и 2-й элементы, вторая пара

3-й и 4-й элементы, и т.д. Исходные данные объявлены так, как показано ниже. Запрещается использовать переменные, не описанные ниже, но разрешается не использовать часть из них.

                    Листинг программы
                
 
                        
                          
                    
const 
    N=40;
var
    a: array[1..N] of integer;
    i, j, min: integer;
begin
   for i:=1 to N do
      readln (a[i]);
  ...
 
end.

Вопрос в чём, как рассматривать элементы попарно (1-й со 2-м, 3-й с 4-м и т.д), а не a[i]+a[i+1] ?

Решение задачи: «Нахождение и вывод пары с наименьшей суммой среди непересекающихся пар соседних элементов»

textual
                            Листинг программы 
                        
 
                        
                          
                    
min:=a[1]+a[2];
i:=3;
while i<n do
 begin
  if a[i]+a[i+1]<min then min:=a[i]+a[i+1];
  i:=i+2;
 end;

Оцени полезность:

15 голосов , оценка 4.2 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Похожие ответы