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.

Answer 2

vb не знаю, на старом паскале это цикл от 917 с шагом 900

Answer 3

А почему шаг 900 ?

Answer 4

можно и от 17 с шагом 1 плюс со всеми тремя проверками но зачем?

Answer 5

то же самое но короче

Answer 6

Окей, спасибо