(*~\Глагол\Приложения\МПГпр\~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~*)
(**)                              ОТДЕЛ Отдел1;
(*============================================================================*)
(* БИБЛИОТЕЧНЫЙ отдел. Используется в Приложении Пример.
 *                    Код примеров предназначен для просмотра человеком,
 *            поэтому
 *                    примеры очень узконаправленные                          *)
(*============================================================================*)

ИСПОЛЬЗУЕТ
  ОБХОД (* *);

ВИД
  Набор1- = НАБОР         (* НЕ скрытый, а общедоступный набор *)
    ч1- :ЦЕЛ; (* общедоступное свойство для чтения *)
    з1+ :ЦЕЛ; (* общедоступное свойство для записи *)
  КОН;

  Набор2- = НАБОР(Набор1) (* НЕ скрытый, а общедоступный набор *)
    ч2- :ЦЕЛ; (* общедоступное свойство для чтения *)
    з2+ :ЦЕЛ; (* общедоступное свойство для записи *)
  КОН;

ПЕР
  п+ :ЦЕЛ;               (* общедоступная переменная *)
  р- :РЯД 2 ИЗ ЦЕЛ;

(*~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~общедоступная ЗАДАЧА~~~~~~~~~~~~~~~~~~~*)
ЗАДАЧА Задача-(яч+:ОБХОД.Ячейки);
УКАЗ
  яч[2]:=1;
КОН Задача;

КОН Отдел1.
