Desenho em Pascal

Esse foi um dos desenhos que mais gostei de fazer no Pascal. É o do Desafio 8 do Passo a passo do guia de estudos 1.

at;
pdireita(90);
pfrente(30);
pdireita(-90);
pfrente(30);
pdireita(90);
pfrente(30);
pdireita(90);
pfrente(30);
pdireita(-90);
pfrente(30);
pdireita(-90);
pfrente(30);
pdireita(90);
pfrente(30);
pdireita(90);

pfrente(30);
pdireita(-90);
pfrente(30);

end.