Помогите пожалуйста!!!!! Написать программу сумма цифр двухзначного числа!!!!

program raf105;

var ab,a,b,sum: integer;

begin

write('Введите двузначное число: ');

readln(ab);

a:= ab div 10;

b:= ab mod 10;

sum:= a+b;

writeln('Сумма цифр: ',sum);

end.

Язык PascalABC