(clear)
(defglobal ?*a* = 0)
(deftemplate window  
 (slot Wname)  
 (slot Wcolor))  
(deffacts windows  
 (window (Wname w1) (Wcolor orangey) )  
 (window (Wname w2) (Wcolor purple) )  
 (window (Wname w3) (Wcolor black) )  
 (window (Wname w4) (Wcolor yellow) )  
 (window (Wname w5) (Wcolor silver) )  
 (window (Wname w6) (Wcolor black) )  
 (window (Wname w7) (Wcolor gray) )  
) 
 
 
(defrule VivodWindows  
    (window  
        (Wname ?x)  
        (Wcolor ?y) 
) 
 
 
=>
(bind ?*a* (+ ?*a* 1))
(while ( < (?*a* 6))
do
 
(printout t "Window" crlf ?x : ?y crlf)  
 
))

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

24.03.2017, 10:49

Ответы с готовыми решениями:

Нарисовать несколько окон разного цвета и разного размера в разных местах
Нарисовать несколько окон разного цвета и разного размера в разных местах.

Сгенерировать случайным образом и вывести на экран 8 окон разного цвета и размера
Сгенерировать случайным образом и вывести на экран 8 окон разного цвета и размера.

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

Рисование квадратов разного размера, разного цвета и появляющихся в произвольных местах экрана
Помогите пжл с задачкой: 1) Рисование квадратов разного размера, разного цвета и появляющихся в...

	24.03.2017, 10:49

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

24.03.2017, 10:49

Помогаю со студенческими работами здесь

Изобразить три вертикальные полосы разного цвета на экране, которые меняют свои цвета
Прохожу учебную практику, имеется порядка 30 задач. С этими возникли трудности 1)модуль crt ...

Определить, сколько дней модница сможет носить перчатки разного цвета
Гульфия – модница. Для участников школьного этапа Всероссийской олимпиады школьников по информатике...

Имеются n досок разного цвета. Необходимо выбрать из них не менее k досок одного цвета длиной не менее h сантиметров
На лесопилке имеются n досок разного цвета. Необходимо выбрать из них не менее k досок одного цвета...

Шары разного цвета
В урне 5 белых и 3 красных шара. Из нее поочередно, возвращая вынутый шар назад, случайным образом...

Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:

Наверх