![]() |
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
![]() ![]() |
![]() |
eXTreMe |
![]()
Сообщение
#1
|
Гость ![]() |
я не знаю как решить ребус VOLVO+FIAT=MOTOR. Пожалуйста кто-нибудь помогите решить его!!!
Заранее благодарен, eXTreMe |
volvo |
![]()
Сообщение
#2
|
Гость ![]() |
eXTreMe, а кто такая FIAT?
![]() |
klem4 |
![]()
Сообщение
#3
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: ![]() ![]() ![]() |
да простят меня модераторы и администраторы
![]() ![]() ![]() -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
Altair |
![]()
Сообщение
#4
|
![]() Ищущий истину ![]() ![]() ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 4 825 Пол: Мужской Реальное имя: Олег Репутация: ![]() ![]() ![]() |
![]() ![]() ![]() ![]() ![]() -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
volvo |
![]()
Сообщение
#5
|
Гость ![]() |
Эх, так никто и не скажет про FIAT ...
![]() eXTreMe, вот решение ребуса (взято отсюда: Множества: загадка-ребус и подправлено под нужную задачу...) {В результате - 12 решений... |
klem4 |
![]()
Сообщение
#6
|
![]() Perl. Just code it! ![]() ![]() ![]() ![]() ![]() ![]() Группа: Пользователи Сообщений: 4 100 Пол: Мужской Реальное имя: Андрей Репутация: ![]() ![]() ![]() |
А можно вопрос ... как и в какую сторону надо начинать думать, чтобы решить эту задачу и каков смысл этого решения ?
![]() ![]() и на склько я понял, таким способом можно проверить любое соотношение слов? аа.. про инклуды понял, включае в множество ... Сообщение отредактировано: klem4 - -------------------- perl -e 'print for (map{chr(hex)}("4861707079204E6577205965617221"=~/(.{2})/g)), "\n";'
|
volvo |
![]()
Сообщение
#7
|
Гость ![]() |
Цитата как и в какую сторону надо начинать думать, чтобы решить эту задачу и каков смысл этого решения ? Полный перебор вариантов, исключая повторные присваивания одинаковых цифр разным буквам (для чего и используются множества)... |
eXTreMe |
![]()
Сообщение
#8
|
Гость ![]() |
Volvo, огромное спасибо за программу, она
![]() P.S: ты бы не мог объяснить что делает функция include, а что exclude? |
volvo |
![]()
Сообщение
#9
|
Гость ![]() |
Если описаны
Var то Include(X, S) - Добавляет элемент Х во множество S Exclude(X, S) - Извлекает (удаляет) X из S (если X в это время не входит в S, то просто ничего не делается) |
volvo |
![]()
Сообщение
#10
|
Гость ![]() |
Немного подниму тему...
Вот тут некоторым особо переборчивым (Люди сами не предлагают НИКАКИХ вариантов, а чужие ВСЕГДА критикуют, "можно сделать гораздо эффективнее"... Удобная позиция, правда?) не понравилось, что слишком много циклов в программе, вот - решил переделать на рекурсию, чтобы был выбор... uses crt; |
![]() ![]() |
![]() |
Текстовая версия | 8.09.2024 11:48 |