Pascal. Наибольший элемент массива

Я уже опубликовал исходный код программы на Паскале «Pascal. Наименьший элемент массива«, а теперь требуется найти наибольший элемент массива. Привожу исходный код программы с комментариями.

Pascal. Наименьший элемент массива

Требуется написать программу, которая находит наименьший элемент массива. В качестве языка программирования выбран Паскаль (Pascal). Привожу исходный код программы с комментариями.