Найдите как можно большее натуральное число, в записи которого не встречается цифра 0, которое делится на сумму своих цифр, причём любое число, получаемое из него отбрасыванием одной или нескольких последних цифр, обладает тем же свойством.
Ответ:
24786
Пошаговое объяснение:
Написал программу на языке 1С
Функция Поиск(знач вхЧисло,знач вхСумма,Решение) экспорт
л=вхЧисло*10;
для н=1 по 9 цикл
сумма=вхСумма+н;
ч=л+н;
если ч%сумма=0 тогда
если ч>Решение тогда
сообщить(ч);
Решение=ч;
конецесли;
Поиск(ч,сумма,Решение);
конеццикла;
возврат ложь;
конецФункции
Процедура ПоискЧисла() экспорт
Решение=0;
для ч=1 по 9 цикл
Поиск(ч,ч,Решение);
КонецПроцедуры
Для какого числа это не выполняется ?
24/6=4
247/13=19
2478/21= 118
24786/27=918