Нужна нужно написать программу в pascal abc вычисляющую сумму цифр двухзначного числа. 8 класс

Var
A:byte;
Begin
WriteLn('Введи двузначное число');
ReadLn(A);
WriteLn('Сумма его цифр = ',(A div 10) + (A mod 10));
End.