Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 27.06.2018, 01:41   #1
kotuk
Новичок
Джуниор
 
Регистрация: 26.06.2018
Сообщений: 1
По умолчанию Расшифровать ребус, полученный в результате замены одинаковых букв одинаковыми цифрами. Найти также такие значения цифр, при которых сумма цифр в результате окажется наибольшей.

ДУБ
ДУБ
+ ДУБ
ДУБ
РОЩА
kotuk вне форума Ответить с цитированием
Старый 27.06.2018, 10:19   #2
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

во-первых, написано так, что непонятно, что к чему плюсуется и что является суммой (результатом)

во-вторых, если предположить, что речь идёт про выражение
ДУБ + ДУБ + ДУБ + ДУБ = РОЩА
тогда очевидно, что в слагаемых и сумме, нет одинаковых букв, поэтому вариантов решения будет большое количество.
например, ДУБ - это 357
РОЩА - это 1428

в-третьих, Вы же не думаете, что тут автоматический решатель задач?!
Написать условие задачи недостаточно. Если хотите получить помощь - покажите свои попытки написать код, спросите, что непонятно, что не получается.
А если нужно полностью всё делать за Вас - так это Вам в другой раздел надо обращаться.
Serge_Bliznykov вне форума Ответить с цитированием
Старый 27.06.2018, 10:29   #3
digitalis
Старожил
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 4,534
По умолчанию

Да, написано невнятно, но понято правильно.
Бывает, простая задачка - а решать интересно. Вот утром встал, размял мозги . Заодно вдруг уяснил для себя не совсем проработанные (мной) уголки Паскаля
digitalis вне форума Ответить с цитированием
Старый 27.06.2018, 10:39   #4
Serge_Bliznykov
Старожил
 
Регистрация: 09.01.2008
Сообщений: 26,238
По умолчанию

Цитата:
Сообщение от digitalis Посмотреть сообщение
Бывает, простая задачка - а решать интересно.
бывает.
ну, по поводу "интересности" можно и поспорить - банальные циклы, разложение числа на цифры и сравнение этих цифр. Ничего интересного.
На форуме, кстати, есть универсальный код, которые решает похожие ребусы.
Причём там выражение в символьном виде вводится в программу и она выдаёт варианты.
Вот это интересно.
А тут - банально и просто.
Быстрее было бы написать готовый код, чем обсуждать эту задачку.
Serge_Bliznykov вне форума Ответить с цитированием
Старый 27.06.2018, 10:56   #5
digitalis
Старожил
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 4,534
По умолчанию

Ну как для действующих программеров - то оно конечно, а как отставному размять мозги, чтоб не совсем склероз - так оно в сам раз. А вариантов там 59, sum_max при i = 714

Последний раз редактировалось digitalis; 27.06.2018 в 11:04.
digitalis вне форума Ответить с цитированием
Старый 27.06.2018, 11:03   #6
Аватар
Старожил
 
Аватар для Аватар
 
Регистрация: 17.11.2010
Сообщений: 19,042
По умолчанию

Цитата:
как отставному размять мозги
Вычислить число решений для количества слагаемых от 2 до 9, а не только для 4. Построить график зависимости. Долго смотреть на него. Может какая эврика появится и, глядишь, закон распределения простых чисел родится ))
Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию
Аватар вне форума Ответить с цитированием
Старый 27.06.2018, 21:19   #7
digitalis
Старожил
 
Аватар для digitalis
 
Регистрация: 04.02.2011
Сообщений: 4,534
По умолчанию

Нэ-а Это уже не разминка - это уже диссертация получается
digitalis вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Расшифровать ребус, полученный в результате замены одинаковых букв одинаковыми цифрами. Free pascal. avatar54 Помощь студентам 1 26.02.2017 19:20
Расшифровать ребус, полученный в результате замены одинаковых букв ZigaBr0 Паскаль, Turbo Pascal, PascalABC.NET 2 30.08.2016 10:07
Расшифровать ребус, полученный в результате замены одинаковых букв одинаковыми цифрами. Найти также такие значения цифр, при котор ZigaBr0 Паскаль, Turbo Pascal, PascalABC.NET 3 19.02.2016 17:59
Найти все четырёхзначные десятичные числа, у которых сумма первых двух цифр в два раза больше суммы правых двух цифр студенточкаБИ Assembler - Ассемблер (FASM, MASM, WASM, NASM, GoASM, Gas, RosAsm, HLA) и не рекомендуем TASM 1 26.05.2013 13:26
Найти все слова-числа, т.е. такие, которые состоят только из цифр. Известно, что количество цифр в каждом числе не более 9 (девяти vikichocolate Помощь студентам 1 21.12.2011 00:12