 
цел N   
лог счетчик сброшен  
 
алг  |подсчёт шагов 
нач 
сбросить счетчик 
вверх; увеличить счетчик 
вверх; увеличить счетчик 
вправо; увеличить счетчик 
вниз;  увеличить счетчик 
вниз; увеличить счетчик  
вправо; увеличить счетчик 
показать счетчик 
кон 
 
алг сбросить счетчик  
нач    
N := 0  
счетчик сброшен := да  
кон   
 
алг увеличить счетчик  
дано счетчик сброшен  
надо |  
нач   
N := N+1  
кон   
 
алг уменьшить счетчик  
дано  счетчик сброшен  
надо  |  
нач   
N := N-1  
кон   
 
алг показать счетчик  
дано счетчик сброшен  
надо |  
нач   
вывод "Счетчик: ", N, нс  
кон   
 
 
 
