* Создаются два набора региональных переменных. В регионе 1 создаются
* переменные gcA, gcB, gcC и gcD, в каждую из которых записывается
* символьная строка "One". В регионе 2 создаются переменные gcC, gcD,
* gcE и gcF, в каждую из которых записывается символьная строка "Two".
* Переменные gcC и gcD используются в обоих регионах.

* Затем на экран направляется вывод команды DISPLAY MEMORY. Имена
* переменных памяти gcC и gcD во втором регионе модифицируются: gcC
* превращается в GCC________2, а gcD в GCD________2. Все эти переменные
* локальные и доступны программам более низких уровней.

#REGION 1

REGIONAL gcA,gcB,gcC,gcD

STORE 'One' to gcA,gcB,cgC,gcD

#REGION 2

REGIONAL gcC,gcD,gcE,gcF && gcC and gcD are common to both regions

STORE 'Two' to gcC,gcD,gcE,gcF

DO showmemory

PROCEDURE showmemory

DISPLAY MEMORY LIKE g*