Escreva um procedimento ColocarADistancia3 que receba uma cor e uma direção, e coloque uma pedra dessa cor em 3 lugares na direção especificada, partindo da célula inicial (que não importa qual é).

Por exemplo, se executássemos ColocarADistancia3(Vermelho, Norte) partindo desde a origem, deveríamos ver este tabuleiro final:

GBB/1.0 size 4 4 cell 0 3 Rojo 1 head 0 3