Напишите программу, которая вычисляет сумму цифр введенного двухзначного числа. (Pascal)

Предыдущий
вопрос Следующий
вопрос

program SumDigits;

var
num, tens, ones, sum: Integer;

begin
writeln('Enter a two-digit number: ');
readln(num);

if (num < 10) or (num > 99) then
writeln('Please enter a two-digit number.')
else
begin
tens := num div 10;
ones := num mod 10;
sum := tens + ones;

end;
end.