Задача. Наибольшие числа

Напишите функцию

function max(x,y:longint):longint
которая в глобальном массиве будет находить наибольший элемент из элементов с номерами от x до y. Пользуясь этой функцией решите следующую задачу.

Вводится сначала число N, а затем - N чисел (N не меньше 3 и не превышает 20, числа - из диапазона integer). Трубется найти наибольшее число в первой половине массива (среди элементов с номерами с 1 до (N div 2)), во второй половине массива (среди элементов с ((N div 2)+1) до N) и во всем массиве.

Пример вводаПример вывода
5
2 4 3 7 4
4 7 7