Segunda abordagem

A idéia aqui é começar por avançar 100 passos e recuar esses mesmos 100 passos para depois avançar um passo apara a direita. Esse movimento será repetido tantas vezes até se obter um retângulo totalmente preenchido. Se altura do retângulo for dada pela variável :alt, a tati terá que fazer o seguinte movimento básico:

pf :alt pt :alt pd 90 pf 1 pe 90

Este movimento deverá se repetir :lar vezes. O procedimento final fica assim:

aprenda retangulo :alt :lar
pf :alt pt :alt
repita :lar-1 [ pd 90 pf 1 pe 90 pf :alt pt :alt]
fim

Nota: Temos no exemplo que a tati desenha um traço vertical e em seguida fará um pequeno traço (de um passo) para o lado toda vez que chega na base do retângulo.

Uma outra forma seria utilizar recursão com um teste para interrompê-la.

aprenda retangulo :alt :lar
se :lar=0 [pare]
pf :alt pt :alt 
se não :lar=1 [pd 90 pf 1 pe 90]
retangulo :alt :lar-1
fim

Nota: A cada traço vertical desenhado, a variável :lar é descontada em um unidade. Assim, ao atingir o valor 0, o retângulo estará completo.