Найти наименьшее натуральное число, которое делится на 17, оканчивается на 17 и имеет...

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.

---

Comments

PascalABC.NET

---

917.Step(900) как в vb выглядит?

---

Если такая программа краткая можно на vb,

---

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

---

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

---

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

---

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

---

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