Решите 7 класс найти сумму цифр двухзначного числа вас,заранее

Program n1;
var a,sum: integer;
begin
write('введите число: ');
readln(a);
sum:=(a mod 10)+(a div 10);
writeln('сумма цифр числа ',a,' равна ',sum);
end.