Массив в Delphi

[Начинающий програм]

Всем доброго времени суток! Если кто знает как решаются эти задачи, помогите пожалуйста их сделать. Только сделать их нужно без использования процедур и функций.

Задача
В одномерном массиве, состоящем из n целых элементов вычислить:
1)номер максимального элемента массива (без поиска максимального элемента);
2)произведение элементов массива, расположенных между первым и вторым нулевыми элементами
3)преобразовать массив таким образом, чтобы в первой его половине располагались элементы, стоявшие в нечетных позициях, а во второй половине - элементы, стоявшие в четных позициях.

[Katus]

1) - что имеется в виду без поиска макс эл-та?

[Начинающий програм]

Я сам не знаю. Мне хоть несколько задач из этих решить, помогите. Как понимаете. Только без процедур и функций. Если можно.