Question

Помогите...
Написать программу для нахождения суммы цифр двузначного числа(в Pascal ABC)

Answer 1

var a,s:integer;
begin
read(a);
s:=(a div 10)+(a mod 10);
writeln(s);
end.