Игра "Составь слова из слова ГАСТРОНОМ"

Рекорд - 225 слов!!

Да ну, там половина слов которые вообще невесть откуда взяли.


------------------

Это скучно и неинтересно. В бытность студентом обыгрывал всех подряд, хочь у нас народ в группе был весьма головастый.

Гораздо интереснее другое. И пожалуй это и можно считать настоящей игрой разума.

Взять, к примеру, орфографический словарь в формате dbf и написать код, который будет автоматически формировать слова из исходного слова на базе словаря. Вот это я понимаю - будет настоящая "игра разума". Код, понятное дело, лучше написать FPD или в крайнем случае на VFP.

Ну, понятное дело, только имена существительные единственного числа учитывать, кроме тех случаев, когда в единственном числе слово не применяется (ножницы и т.п.)

Я бы сделал табличку в которой каждому слову из словаря проставил бы тридцать три поля по каждой букве n(1), и проставил бы в этих полях количество каждой из букв.
Дальше селектом выбирал бы все слова, которые по всем полям-буквам меньше или равны искомому.
Пример таблицы
ID|Слово|А|Б|В|Г|Д|Е|Ё|Ж|З|И|К...
01|Гад |1|0|0|1|1|0|0|0|0|0|0...
02|Ад |1|0|0|0|1|0|0|0|0|0|0...
03|Загадка|3|0|0|1|1|0|0|0|0|0|1|...
...
Селектик получается простой, но длинный. К сожалению нет под рукой VFP чтобы расписать его, а синтаксис почти забыл
Думаю даже индексироваться должно нормально.



Исправлено: Zakharov_slava, 03.02.16 08:09

Да уж, где они там 225 слов набрали и что это за слова? Похоже, там почти любые сочетания букв подходят, если бы еще знать их значения
[attachment 23651 ]
Некоторые сокращения принимает (га, РАО, ГОСТ), а некоторые нет (ООН, ОАО).
Слово "он" приняло, а "оно", "она" - нет.
Египетского бога Ра не знает.

В такой игре важно точно оговорить допустимые слова. Например, в бытность студентами у нас был такой критерий. Слово должно быть именем существительным единственного числа (без имен собственных и аббревиатур с БОЛЬШИМИ буквами). Кроме того, написавший заковыристое слово должен был сказать, что это слово обозначает. Написанные "наугад" слова не засчитывались.

Что же касаемо софта, то здесь вопрос с правилами предельно простой. Формируется подмножество слов из орфографического словаря, удовлетворяющее заданным критериям, и - "погнали".

Насобирал немного слов..

[attachment 23668 snip_20160205153918.png]

тас, ном, сат - бред а не головоломка. всзад.


------------------

Zakharov_slava
Я бы сделал табличку в которой каждому слову из словаря проставил бы тридцать три поля по каждой букве

Славка! я б тебя уволил че трудна разложить поля в строки? стареешь ты, брат

Zakharov_slava
Селектик получается простой, но длинный. К сожалению нет под рукой VFP чтобы расписать его, а синтаксис почти забыл

ты это сурьезно? а просто писАть еще не разучился?


------------------

в продолжение темы решение infostart.ru


------------------

Foxtrot
в продолжение темы решение infostart.ru

Целая конфигурация ради гастронома? Бреед!

Simple777
Это скучно и неинтересно. В бытность студентом обыгрывал всех подряд, хочь у нас народ в группе был весьма головастый.
Гораздо интереснее другое. И пожалуй это и можно считать настоящей игрой разума.

Взять, к примеру, орфографический словарь в формате dbf и написать код, который будет автоматически формировать слова из исходного слова на базе словаря. Вот это я понимаю - будет настоящая "игра разума". Код, понятное дело, лучше написать FPD или в крайнем случае на VFP.

Код написать проще и скучнее, чем искать знакомые слова без словаря и гугла. Другое дело, если речь пойдет об оптимизации кода, например, по скорости работы. А если без оптимизации, то на коленке пишется за несколько минут.

в мое решении все обошлось одним селектом почти как Славка предлагал
Запрос = Новый Запрос("ВЫБРАТЬ
| СловаБуквы.Ссылка.Код КАК Код
|ИЗ
| Справочник.Слова.Буквы КАК СловаБуквы
| ВНУТРЕННЕЕ СОЕДИНЕНИЕ Справочник.Слова.Буквы КАК СловаБуквы2
| ПО СловаБуквы.Ссылка = СловаБуквы2.Ссылка
| ВНУТРЕННЕЕ СОЕДИНЕНИЕ Справочник.Слова.Буквы КАК Буквы
| ПО СловаБуквы.Буква = Буквы.Буква
| И СловаБуквы.Количество <= Буквы.Количество
|ГДЕ
| Буквы.Ссылка.Код = &Код
//| И СловаБуквы.Ссылка.Код <> &Код
|
|СГРУППИРОВАТЬ ПО
| СловаБуквы.Ссылка.Код
|
|ИМЕЮЩИЕ
| КОЛИЧЕСТВО(РАЗЛИЧНЫЕ СловаБуквы.Буква) = КОЛИЧЕСТВО(РАЗЛИЧНЫЕ СловаБуквы2.Буква)
|
|УПОРЯДОЧИТЬ ПО
| Код");
Запрос.УстановитьПараметр("Код", НРег(Гастроном));


------------------

Foxtrot
Справочник.Слова.Буквы КАК СловаБуквы ...

Ты зачема тут сотону вызываешь, охальник


------------------

так и есть сей инструмент тяперича как основной будь он не ладен


------------------

Foxtrot
так и есть сей инструмент тяперича как основной будь он не ладен бен

Как гриться:
Старый стал - гавно стал.
Молодый был - тоже гавно был.

В свое оправдание могу только сказать, что последние лет 8 работаю с хранилищами данных, поколоночным хранением и т.д.
Но по строкам это, коненчо, удобнее для транзакционных систем.
Но это не умаляет того что мне бы за это оторвать руки

Балда на Mail.ru
minigames.mail.ru



Исправлено: WbrErr, 22.02.16 14:21

Igor Korolyov
Ты зачема тут сотону вызываешь, охальник

------------------