dim n as integer, i as integer, max as integer, j as integer
dim a(n) as integer
max = 0
input n
for i=1 to n
   input a(i)
next i
for i=1 to n-6
   for j=i+6 to n
   if a(i)+a(j) > max then max = a(i)+a(j) endif
   next j
next i
print max