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

Pascal (Паскаль). Вывод чётных и нечётных чисел массива в Паскале. Способ второй. Odd(i_Num).
В Паскале имеется встроенная функция: odd(i_Num), которая возвращает ИСТИНА, если аргумент нечетное число.
Код:

program Even_Task;
  //программа вывод чётных и нечётных чисел массива в Паскале способ второй
const
  n = 10;
var
  i: integer;
  i_MasNum: array[1..n] of integer;
  i_Num_even: boolean;

begin
  //заполяем массив
  i_MasNum[1] := 7;
  i_MasNum[2] := 15;
  i_MasNum[3] := -18;
  i_MasNum[4] := 32;
  i_MasNum[5] := 18;
  i_MasNum[6] := 33;
  i_MasNum[7] := 11;
  i_MasNum[8] := 12;
  i_MasNum[9] := 181;
  i_MasNum[10] := 8;
  for i := 1 to n do
  begin
    i_Num_even := odd(i_MasNum[i]); // нечетное число
    if i_Num_even then
      Writeln('Нечетное число: ', i_MasNum[i])
    else
      Writeln('Четное число: ', i_MasNum[i]);
  end;
  //завершение работы программы
  WriteLn('Нажмите <Enter>, чтобы выйти.');
  ReadLn();
end.

Результат:

Вывод четных и нечетных чисел массива в Паскале, способ 2 функция odd(i).