Задачка: Дано 2-х значное число, найти является ли сумма его цифр

//Pascal
var N: byte;
begin
  write('Введите 2-значное число: '); readln(N);
  if (N mod 10 + N div 10) gt;= 10 then
    writeln('Сумма цифр 2-значная = ', N mod 10 + N div 10)
  else
    writeln('Сумма цифр не 2-значная = ', N mod 10 + N div 10);
  readln;
end.


Пример:
Введите 2-значное число: 86
Сумма цифр 2-значная = 14
---------------------------------------------
Введите 2-значное число: 54
Сумма цифр не 2-значная = 9