(* Задача: выложить рамку из красных плиток, примыкающую к границе поля,
 и вторую рамку из зеленых плиток, примыкающую к рамке из красных плиток *)
Программа  {
 Делать пока ( НЕ справа стена  ) {
  Положить( к );
  Шаг вправо; 
 }; (* Выкладываем ряд красных плиток вдоль нижней стенки *)  
 Делать пока ( НЕ сверху стена  ) { 
  Положить( к );
  Шаг вверх;
 }; (* Выкладываем ряд красных плиток вдоль правой стенки *)
 Делать пока ( НЕ слева стена  ) { 
  Положить( к );
  Шаг влево; 
 }; (* Выкладываем ряд красных плиток вдоль верхней стенки *) 
 Делать пока ( НЕ снизу стена  ) {
  Положить( к ); 
  Шаг вниз;
 }; (* Выкладываем ряд красных плиток вдоль левой стенки *)
 Перейти на( 2,2 );
 Делать пока ( НЕ красная ) {
  Положить( з );
  Шаг вправо;  
 }; (* Выклвдываем нижний ряд из зеленых плиток *)
 Шаг влево;
 Шаг вверх;
 Делать пока ( НЕ красная ) { 
  Положить( з );
  Шаг вверх;
 }; (* Выклвдываем правый ряд из зеленых плиток *)
 Шаг вниз;
 Шаг влево;
 Делать пока ( НЕ красная ) {
  Положить( з ); 
  Шаг влево;
 }; (* Выклвдываем верхний ряд из зеленых плиток *)
 Шаг вправо;
 Шаг вниз;
 Делать пока ( НЕ красная  И НЕ зеленая) { 
  Положить( з );
  Шаг вниз;
 }; (* Выклвдываем левый ряд из зеленых плиток *)
}
