ИГРАТЬИЖДАТЬВВОДА (111, 10)
  ЕСЛИ (_ВВОД = 1) ТО
      ПЕРЕВЕСТИНАНОМЕР (113)
  ИНАЧЕЕСЛИ (_ВВОД = 2) ТО
      ПЕРЕВЕСТИНАНОМЕР (114)
  ИНАЧЕЕСЛИ (_ВВОД = 3) ТО
      ПЕРЕВЕСТИНАНОМЕР (115)
  ИНАЧЕЕСЛИ (_ВВОД = 9) ТО
      ПЕРЕВЕСТИНАНОМЕР (116)
  ИНАЧЕЕСЛИ (_ВВОД = _ВНУТРЕННИЙНОМЕР) ТО
      ПЕРЕВЕСТИНАНОМЕР (_ВВОД)
  ИНАЧЕЕСЛИ (_ВВОД = _ПУСТО) ТО
     ПЕРЕВЕСТИНАНОМЕР (101)
  ИНАЧЕ
     ПРОИГРАТЬ (112)
     ПЕРЕВЕСТИНАНОМЕР (120)
  КОНЕЦЕСЛИ