Найдите количество двузначных чисел, которые делятся ** сумму своих цифр.Pascal ABC

Question

Найдите количество двузначных чисел, которые делятся на сумму своих цифр.Pascal ABC

Answer 1

Чувак, я не знаю паскаля, в коде могут быть ошибки синтакисиса. По сути так:
begin
    var count : integer;
    for var i := 10 to 99 do
        if i mod (i mod 10 + i div 10)  < 1 then count := count + 1;
end;
Это PascalABC.Net, вроде я не ошибся.