взяти пак пак1
взяти пак пак1 [ПАК1]

якщо пак1 не є Модуль
  впасти
кінець
якщо пак1.ПАК1 != "ПАК1"
  впасти
кінець
якщо пак1.ПАК1 != ПАК1
  впасти
кінець