Как решить такую задачу в паскале?? Дано двузначное число. Найти сумму его цифр.

Question

Как решить такую задачу в паскале??
Дано двузначное число. Найти сумму его цифр.

Answer 1

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

Пример:
a = 25
s = 7