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