Дано двухзначное число которое вводится с клавиатуры.напишите програму которая найдет сумму его цифр. заранье

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

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