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

Дано двузначное число. Найти произведение его цифр в паскале.

program Um_Num1_Num2_Task;
  // Дано двузначное число. Найти произведение его цифр в паскале.
var
  i_NUm, i_NUm1, i_NUm2: integer;
  i_UmNUm: integer;
begin
  WriteLn('Ввод двузначного числа:');
  ReadLn(i_NUm);
  i_NUm1 := i_NUm div 10;
  i_NUm2 := i_NUm mod 10;
  i_UmNUm := i_NUm1*i_NUm2;
  // Вывод чисел на экран
  Writeln('Исходное число: ', i_NUm, ', первая цифра: ',
    i_NUm1, ', вторая цифра: ', i_NUm2);
  // вывод: произведение цифр двузначного числа
  Writeln('Произведение цифр: ', i_UmNUm);
  //завершение работы программы
  WriteLn('Нажмите <Enter>, чтобы выйти.');
  ReadLn();
end.

Результат:

Дано двузначное число. Найти произведение его цифр в паскале.