Пасьянс на Visual Prolog
Текст: Необходимо разложить все карты в четыре кучки (по мастям: туз, король, ..., шестерка), используя три промежуточные кучки за три раздачи. Карта из колоды выкладывается или в одну из четырех кучек, если это не нарушает последовательности, или в промежуточную, циклически меняющуюся кучку. Колода для следующей раздачи получается соединением карт промежуточных кучек.
Заранее благодарен.