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

Даны два числа. Вывести наибольшее из них. Паскаль.
Решение:

program Task_Num1;

  {задачи на числа паскаль с решением}
  { Даны два числа. Вывести наибольшее из них. Паскаль}
var
  i_Num1, i_Num2: integer;

begin
  WriteLn('Введите первое число');
  ReadLn(i_Num1);
  WriteLn('Введите второе число');
  ReadLn(i_Num2);
  if i_Num1 > i_Num2 then
    WriteLn('Первое число больше второго')
  else
    WriteLn('Второе число больше первого');
  //завершение работы программы
  WriteLn('Нажмите <Enter>, чтобы выйти.');
  ReadLn();
end.

Результат:

Даны два числа. Вывести наибольшее из них. Паскаль.