Дано трехзначное число ,верно ли что сумма его цифер больше 10. сложность 8 класса

Program n1;
var a: integer;
begin
readln(a);
if (a mod 10)+(a div 100)+(a mod 100 div 10)>10 then write('верно') else write('неверно');
end.