var
 a,b,c,d,e:boolean;  {улицы}
 f,g:boolean;       {шлагбаумы}
 i:byte;    {переменная для инициализации}
 data:text;
 s:string;  {переменная для вывода результатов}

begin
 assign(data,'inputNAV.txt');reset(data); {открываем "inputNAV.txt"}
  readln(data); {пропускаем строку пояснение}
  read(data,i); a:=(i=1);     {­считываем данные}
  read(data,i); b:=(i=1);
  read(data,i); c:=(i=1);
  read(data,i); d:=(i=1);
  read(data,i); e:=(i=1);
  read(data,i); f:=(i=1);
  read(data,i); d:=(i=1);      
 close(data); {закрываем "inputNAV.txt"}

 if (a and b and not f)or(c and d)or(e and not g) {если один из путей свободен}
        then
         begin
          if a and b and not f
            then s:='Маршрут: A, B, F';    {выбираем один из свободных путей}
          if c and d
            then s:='Маршрут: C, D';
          if e and not g
            then s:='Маршрут: E, G';
          end else s:='Лучше иди пешком';       {иначе, даём дельный совет}


 write(s); {выводим результаты}
 readln(); {ждём завершения}
end.