Дано двузначное число(n). найти сумму цифр двузначного числа. сделать в паскале)

Uses crt;
var n,s,a,b: integer;
begin
writeln('Введите число n');
readln(n);
a:=n mod 10;
b:=n div 10;
s:=a+b;
writeln(s);
end.