Разработчику о работе с 1С:Предприятие, Pascal, Паскаль

Как найти минимальный элемент массива в паскале?
Константа MAXINT.

program MAXINT_Min_Seek_Task;
  { найти минимальный элемент массива }
var
  i_MasNum: array[1..4] of integer;
  i_MinNum, i: integer;
begin
  Writeln('Введите элемент массива');
  i_MinNum := MAXINT;
  for i := 1 to 4 do
  begin
    ReadLn(i_MasNum[i]);
    if i_MinNum > i_MasNum[i] then
      i_MinNum := i_MasNum[i];
  end;
  //Вывод на экран
  Writeln('Минимальный элемент массива = ', i_MinNum);
  //завершение работы программы
  WriteLn('Нажмите <Enter>, чтобы выйти.');
  ReadLn();
end.

Результат:

Как найти минимальный элемент массива в Паскале.

Дополнительные материалы:
Найти минимальный элемент массива, паскаль.
Найти минимум и максимум в массиве — Pascal (Паскаль).
Найти минимальное число в массиве, паскаль.
Минимальное значение, которое может иметь число типа Integer в Паскале.
Найти минимальный элемент массива и его порядковый номер. Паскаль (Pascal).