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

0 интересует 0 не интересует
124 просмотров

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


спросил от Начинающий (127 баллов) в категории Информатика
1 Ответ
0 интересует 0 не интересует
ответил от Одаренный (2.5k баллов)

begin

 foreach var x in 917.Step(900) do

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

end.


image
оставил комментарий от Одаренный (2.5k баллов)
0 0

PascalABC.NET

оставил комментарий от БОГ (678k баллов)
0 0

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

оставил комментарий от БОГ (678k баллов)
0 0

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

оставил комментарий от Одаренный (2.5k баллов)
0 0

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

оставил комментарий от БОГ (678k баллов)
0 0

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

оставил комментарий от Одаренный (2.5k баллов)
0 0

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

оставил комментарий от Одаренный (2.5k баллов)
0 0

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

оставил комментарий от БОГ (678k баллов)
0 0

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

...