Задание: В массиве все элементы, стоящие выше максимального элемента, заменить на максимальный элемент первого столбца.
Не использовать Randomize, не нужны функции.
Методичка: И.В. Беляева Основы программирования на языке Турбо Паскаль, задание находится на стр. 78 (В2)