ПАСКАЛЬ 7 Найти сумму числ двузначного числа (допустим 25- 2+5) Прошу вас

Question

ПАСКАЛЬ 7
Найти сумму числ двузначного числа (допустим 25- 2+5)
Прошу вас

Answer 1

Program ex;
var a,s:integer;
begin 
readln(a); 
s:=(a div 10) + (a mod 10); 
writeln('Сумма разрядов =' , s)
end.