Question

Дано двух значное число найдите сумму его цифр Паскаль

Answer 1

===== PascalABC.NET =====

begin

 var n := ReadInteger('n =');

 Println('Сумма цифр равна', n div 10 + n mod 10)

end.