Question

Найти наименьшее натуральное число, которое делится на 17, оканчивается на 17 и имеет сумму цифр 17. Задачу решить с помощью написанной программы.
Задачу решить лучше на vb но можно pascal

Answer 1

begin

 foreach var x in 917.Step(900) do

   if x mod 17 = 0 then begin Print(x); break end

end.