Refal проблема со скобками -> Форум на Исходниках.Ру

	Наши проекты: Журнал · Discuz!ML · Wiki · DRKB · Помощь проекту

Здравствуйте, Гость ! [18.117.183.252]

Правила раздела Прочие языки программирования.

Коротко о разделе:
Здесь разрешается создавать темы, относящиеся к любому языку программирования, для которого не существует раздела на форуме (например, Lisp, Tcl/Tk, FORTRAN и т.д.). Если раздел для нужного Вам языка есть, большая просьба создавать тему в нем.
Вопросы, связанные с JScript, Perl, PHP обсуждаются в разделе WWW Masters.

Обратите внимание:
1. Прежде чем задать вопрос, воспользуйтесь поиском. Возможно, Ваш вопрос уже обсуждали.
2. Если Ваш вопрос связан с конкретным языком программирования, обязательно укажите название языка в имени темы.
3. Постарайтесь давать темам информативные названия. Темы с названиями типа "Помогите, горю" будут удалены.
4. Помните, чем грамотней будет задан Ваш вопрос, тем больше будет у Вас шансов получить на него ответ. Как правильно задавать вопросы
5. Ипользуйте тег [ code ] ...текст программы... [ /code ] для выделения текста программы.

Просьбы выполнить какую-либо работу за автора в этом разделе не обсуждаются. Темы с подобными просьбами будут перемещены или удалены. Для заказов у нас существуют специальные разделы: Разовые заказы и подработка, ПОМОЩЬ СТУДЕНТАМ.

Если кто не понял (а такие есть) — чтобы за вас решали ваши задачки, идите на другие ресурсы.

Полезные ссылки:
Есть.

Модераторы: B.V.

Новое голосование

Refal проблема со скобками

Mirazhanka

Сообщ. #1 , 09.06.13, 13:39

Unregistered

Вот задание: "Запрограммируйте вычисление значения логического выражения классической логики высказываний. 1 - обозначает истину, 0 - ложь."
Пример: "Исходное выражение: 1 & ( 1 => 0) v (0 <=> ~0)"

Проблема в том, что он не понимает скобки, у самой не получается додуматься. Как сделать так, что-бы он их понимал?
Вот мой код:

Скрытый текст

$ENTRY Go { = <Prout <Pal <Card>>>; }
Pal {
'0'='0';
'1'='1';
e.1'~0'e.2=<Pal e.1'1'e.2>;
e.3'~1'e.4=<Pal e.3'0'e.4>;
e.5'0&0'e.6=<Pal e.5'0'e.6>;
e.8'0&1'e.7=<Pal e.8'0'e.7>;
e.10'1&0'e.9=<Pal e.10'0'e.9>;
e.11'1&1'e.21=<Pal e.11'1'e.21>;
e.12'0v0'e.22=<Pal e.12'0'e.22>;
e.13'1v1'e.23=<Pal e.13'1'e.23>;
e.14'1v0'e.24=<Pal e.14'1'e.24>;
e.15'0v1'e.25=<Pal e.15'1'e.25>;
e.16'1<=>1'e.26=<Pal e.16'1'e.26>;
e.16'0<=>0'e.26=<Pal e.16'1'e.26>;
e.16'1<=>0'e.26=<Pal e.16'0'e.26>;
e.17'0<=>1'e.27=<Pal e.17'0'e.27>;
e.18'1=>0'e.28=<Pal e.18'0'e.28>;
e.19'0=>0'e.29=<Pal e.19'1'e.29>;
e.21'0=>1'e.22=<Pal e.21'1'e.22>;
e.31'1=>1'e.32=<Pal e.31'1'e.32>;

}

1 пользователей читают эту тему (1 гостей и 0 скрытых пользователей)

0 пользователей:

[ Script execution time: 0,0574 ] [ 14 queries used ] [ Generated: 21.05.24, 03:01 GMT ]