Стили и методы программирования




Пример 10.2.1


ENTRY Go{=>};

Letters {='abcdefghijklmnopqrstuvwxyz';};

Init{=;

e.1=;};

St1 {

s.1 e.3,: e.A s.1 e.B =;

= >;

s.1 e.3 =;

};

St2 {(e.2)= >;

s.1 e.3 (e.2),: e.A s.1 e.B =;

s.1 e.3 (e.2)=;

};

* St3 не нужно

Outstr {

e.2, : {s.1 e.2 = >;};

};

*

* Вторая программа, чуть дальше от непосредственной автоматной модели

*

$ENTRY Go{=>};

Letters {='abcdefghijklmnopqrstuvwxyz';};

Init {=;

e.1=;};

Parse {

s.1 e.3 (e.2),: e.A s.1 e.B =;

(e.2)= >;

s.1 e.3 (e.2)=;

};

Outstr { = ;

e.2, : {s.1 e.2 = >;};

};




Содержание  Назад  Вперед