Имя: Пароль:
LIFE
Наука
OFF: Задача про лотерейные биллеты
0 1Сергей
 
22.07.22
14:04
Заработав немного денег, одинесники решили сыграть в лотерею. Лотерейные билеты имеют семизначные номера. Одинесники решили купить такие билеты, у которых сумма цифр в номере будет равняться их любимому числу — 62. Сколько всего билетов смогут купить одинсеники, если все билеты пока есть в наличии?
1 Kigo_Kigo
 
22.07.22
14:10
(0) "их любимому числу — 62" А ты тоже с Рязани? :)))
2 Garykom
 
гуру
22.07.22
14:10
9*7 = 63
63-62 = 1
3 Kigo_Kigo
 
22.07.22
14:12
161 290
4 СеменовСемен
 
22.07.22
14:12
(2) тогда ответ 7
5 Garykom
 
гуру
22.07.22
14:12
9999998
6 Kigo_Kigo
 
22.07.22
14:13
(5) Потому что один в (2) ты уже купил ? Бгггг
7 1Сергей
 
22.07.22
14:14
(4) Это верный ответ
8 Eiffil123
 
22.07.22
14:17
получив ответ из консоли запросов понял логику. ответ 7

"ВЫБРАТЬ
|    0 КАК Цифра
|ПОМЕСТИТЬ Цыфры
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
|    1
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
|    2
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
|    3
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
|    4
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
|    5
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
|    6
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
|    7
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
|    8
|
|ОБЪЕДИНИТЬ ВСЕ
|
|ВЫБРАТЬ
|    9
|;
|
|////////////////////////////////////////////////////////////////////////////////
|ВЫБРАТЬ
|    Цыфры1.Цифра КАК Цифра1,
|    Цыфры2.Цифра КАК Цифра2,
|    Цыфры3.Цифра КАК Цифра3,
|    Цыфры4.Цифра КАК Цифра4,
|    Цыфры5.Цифра КАК Цифра5,
|    Цыфры6.Цифра КАК Цифра6,
|    Цыфры7.Цифра КАК Цифра7
|ИЗ
|    Цыфры КАК Цыфры1,
|    Цыфры КАК Цыфры2,
|    Цыфры КАК Цыфры7,
|    Цыфры КАК Цыфры3,
|    Цыфры КАК Цыфры4,
|    Цыфры КАК Цыфры5,
|    Цыфры КАК Цыфры6
|ГДЕ
|    Цыфры1.Цифра + Цыфры2.Цифра + Цыфры3.Цифра + Цыфры4.Цифра + Цыфры5.Цифра + Цыфры6.Цифра + Цыфры7.Цифра = 62"
9 Fish
 
22.07.22
14:18
(8) Серьёзный подход :)
10 1Сергей
 
22.07.22
14:19
(8) из пушки по воробьям. Но, ответ верный
11 Ryzeman
 
22.07.22
14:20
(8) Мне лень думать в пятницу, решил сделать брутфорсом, но тупая 1с слишком убога для задачи, с которой 30 лет назад легко паскаль справляется... На клиенте - умирает, а на сервере - боюсь прод подвесить)
12 1Сергей
 
22.07.22
14:21
(11) ваша одинеска повисла на цикле из 10 миллионов итераций?
13 Ryzeman
 
22.07.22
14:22
Процедура Команда1(Команда)
    КоличествоКобминаций = 0;
    Для Счетчик = 0 По 9999999 Цикл
        СуммаЦифр = 0;
        Число = Счетчик;
        Пока Число > 0 Цикл        
            СуммаЦифр = СуммаЦифр + (Число % 10);
            Число = Цел(Число / 10);            
        КонецЦикла;
        Если СуммаЦифр = 62 Тогда
            КоличествоКобминаций = КоличествоКобминаций + 1;
        КонецЕсли;
    КонецЦикла;
    Сообщить(КоличествоКобминаций);
КонецПроцедуры


нате, считайте сами.
14 Eiffil123
 
22.07.22
14:25
(10) не, 1сники же ленивые. всё норм
15 Eiffil123
 
22.07.22
14:26
(13) 7 вложенных циклов было бы эффективнее
16 Ryzeman
 
22.07.22
14:26
(15) ты упускаешь ключевое >>Мне лень думать в пятницу
17 Ryzeman
 
22.07.22
14:28
Интересно, дома на нормальном камне сможет прожевать? Надо будет попробовать)
18 1Сергей
 
22.07.22
14:29
(15) я бы рекурсией посчитал
19 Garykom
 
гуру
22.07.22
14:35
(6) Нет просто забыл ,
9999998, 9999989 и т.д.