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

Pascal (Паскаль). Вывод чётных и нечётных чисел массива в Паскале. Способ первый.
Четное число — это число, которое делится на 2 (два) без остатка. Если есть остаток — то число называется нечетным.
Используем функцию: mod, рассмотренную ранее.

Код:

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

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

Результат:

Вывод четных и нечетных чисел массива в Паскале.