Дано двузначное число. Является ли сумма его цифр однозначным числом

Хм ... видимо вопрос не правильный, у двузначного числа сумма цифр не может быть однозначным числом, только двузначным!

вот тебе код Pascal:

Код Pascal

1 2 3 4 5 6 7 8 9 var a, b, n, kod:integer;

begin

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

readln (n) ;

a:=n div 10;

b:=n

mod 10;

if a+b>9 then writeln ('Сума цифр двузначное число')

else

writeln ('Сума не двузначное число') ;

end.

Смотря какая формула например 13=10+3=6+7