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

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

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

Результат:

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