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

var a,s:integer;beginwrite('a = ');readln(a);s:=a div 10+a mod 10;writeln('s = ',s);end.Пример:a = 25s = 7