iniciar-programa
define-nueva-instruccion perimetro(n) como inicio
si orientado-al-sur y izquierda-libre entonces inicio
mientras frente-libre hacer avanza;
repetir n veces deja-zumbador;
apagate;
fin;
si izquierda-libre entonces inicio
gira-izquierda;
avanza;
fin;
mientras izquierda-bloqueada hacer inicio
deja-zumbador;
avanza;
perimetro(sucede(n));
 fin;
fin;

define-nueva-instruccion preparate como inicio
mientras no orientado-al-norte hacer gira-izquierda;
avanza;
repetir 3 veces gira-izquierda;
avanza;
fin;

    inicia-ejecucion
    preparate;
    perimetro(0);
        apagate;
    termina-ejecucion
finalizar-programa


