//-----------------------------------//
//   На ленте  изображено два палоч- //
// ных числа, соединенных знаком вы- //
// читания.  Найти  модуль  разности //
// этих двух чисел, т.е. от большего //
// из этих  двух чисел отнять  мень- //
// шее. В начальный  момент окно ус- //
// тановлено на знак "-".            //
//-----------------------------------//
ЭТО Вычитание_палочек                  
 // Можно ли стереть по одной          
 // палочке у обоих чисел?             
 Проверка                              
 // Результат проверки:                
 // если в ящике знак "-",             
 // стирать палочки не надо.           
 ОБМЕН                                 
 ЕСЛИ -                                
  ТО ПИШИ ПУСТО                        
  ИНАЧЕ                                
  {                                    
    ОБМЕН                              
    Стереть_две_палочки                
    Вычитание_палочек                  
  }                                    
КОНЕЦ                                  
//-----------------------------------//
ЭТО Проверка                           
 // Сначала в ящик запишем знак "-",   
 // он будет обозначать, что стирать   
 // палочки нельзя.                    
 ЯЩИК+                                 
 // Проверим есть ли палочка слева     
 ПОКА НЕ ПУСТО ВЛЕВО                   
 ВПРАВО                                
 ЕСЛИ НЕ -                             
 ТО                                    
 {                                     
   // Проверим есть ли палочка справа  
   ПОКА НЕ ПУСТО ВПРАВО                
   ВЛЕВО                               
   ЕСЛИ НЕ -                           
    ТО                                 
    {                                  
      // Палочки есть и слева и справа.
      // Запишем в ящик знак "|",      
      // он будет обозначать, что      
      // стирать палочки можно.        
      ЯЩИК+                            
      // Установим окно на знак "-"    
      ПОКА НЕ - ВЛЕВО                  
    }                                  
 }                                     
КОНЕЦ                                  
//-----------------------------------//
ЭТО Стереть_две_палочки                
 // Стираем палочку слева              
 ПОКА НЕ ПУСТО ВЛЕВО                   
 ВПРАВО                                
 ПИШИ ПУСТО                            
 ВПРАВО                                
 // Стираем палочку справа             
 ПОКА НЕ ПУСТО ВПРАВО                  
 ВЛЕВО                                 
 ПИШИ ПУСТО                            
 ПОКА НЕ - ВЛЕВО                       
КОНЕЦ                                  
                                       
