Максимальная пара

[daniil123]

Дан массив из N(1<=N<=100000)целых чисел. Найти соседних элемента, сумма которых максимальна.

В первой строке дано натуральное число N, во второй строке - N целых чисел.
Выведите эти элементы в порядке возрастания их индексов. Если искомых пар несколько, выведите первую из них.
Пример:
Вход:
5
1 3 7 2 4
Выход:
3 7

[IT-man]

k:=1;
for i:=2 to n-1 do
if (a[i]+a[i+1])>(a[k]+a[k+1]) then k:=i;
writeln(a[k]:6,a[k+1]:6);