Дан файл, содержащий целые числа - PascalABC.NET

Формулировка задачи:

Дан файл, содержащий целые числа. Вывести на экран максимальный элемент этого Файла Помогите пожалуйста. Знаю, что тут есть добрые люди))

Решение задачи: «Дан файл, содержащий целые числа»

Листинг программы

begin
  var F : File of Integer;
  Assign(F, 'int.dat'); Reset(F);
  var maxElem := Integer.MinValue;
  var Elem : Integer;
  while Not EOF(F) do
    begin
      Read(F, Elem);
      maxElem := max(maxElem, Elem);
    end;
  Close(F);
  Print(maxElem);
end.

Объяснение кода листинга программы

Объявляется файл F типа File of Integer
Файл F открывается на чтение из файла 'int.dat'
Переменная maxElem инициализируется значением Integer.MinValue
Переменная Elem инициализируется значением 0
В цикле while до тех пор, пока не достигнут конец файла (EOF(F) = 0), выполняются следующие действия: 5.1. Чтение содержимого файла в переменную Elem с помощью функции Read(F, Elem) 5.2. Переменная maxElem обновляется новым максимальным значением, которое равно максимуму из текущей Elem и maxElem с помощью функции max
Файл F закрывается с помощью функции Close(F)
Выводится значение переменной maxElem с помощью функции Print(maxElem)