Отчёт по практике: Отчет по технологической практике (Strategy)

Условие задачи
Strategy
Хорошо известный психологический эксперимент заключается в том, что 2 человека играют в игру, в которой они могут либо торговать друг с другом, либо обмануть другого игрока. Если оба игрока торгуются, то каждый получает по одному очку. Если один торгуется, а другой обманывает, то тот, кто торгуется, теряет 2 очка, а мошенник выигрывает 2. Если оба жульничают, то каждый теряет по 1 очку.
Существует множество различных стратегий для игры в эту игру, хотя
большинство людей либо не могут найти выигрышную стратегию, либо,
определившись со стратегией, не придерживаются ее. Таким образом,
справедливее попытаться оценить эти стратегии путем моделирования на компьютере. Каждая стратегия автоматизируется. Автоматизация
характеризуется программой, включающей в себя стратегию, память о
предыдущих встречах и счетчик, отражающий результат автоматизации.
счетчик начинается с нуля и изменяется в соответствии с вышеуказанными правилами после каждой встречи. Память способна определить, что произошло во время двух последних встреч с соперником.
Напишите программу, которая считает до 10 различных стратегий, разыграет каждую стратегию против каждой 10 раз,а затем выведет результаты.
Стратегии будут представлены в виде программ основанных на следующей грамматике
<program>::=<statement>
<statement>::=<command>|<ifstat>
<ifstat>::=IF<condition>THEN<statement>ELSE<statement>
<condition>::=<cond>|<cond><op><condition>
<op>::=AND|OR
<cond>::=<memory> {=|#} {<command>|NULL}
<memory>::={MY|YOUR} LAST {1|2}
<command>::=TRADE|CHEAT

Обратите внимание, что LAST1 ссылается на предыдущую встречу между
этими двумя автоматами, LAST2 - на встречу до нее, а "MY" и "YOUR" имеют очевидное значение. Пробелы и разрывы строк могут появиться в любом месте программы и предназначены только для удобочитаемости. Символ "#" означает "не равен". NULL указывает на то, что встречи не произошло. Ниже приведена
рабочая программа:

CHEAT.
IF MY LAST1 = CHEAT THEN TRADE ELSE CHEAT.
IFYOURLAST2=NULLTHENTRADEELSEIFYOURLAST1=
TRADETHENTRADE
ELSECHEAT.