
program desafio10fvm;
begin
pfrente(100);
pdireita(90);
pfrente(100);
pdireita(90);
pfrente(100);
pdireita(90);
pfrente(100);
pdireita(45);
un;
pfrente(30);
ptras(30);
ul;
pfrente(30);
pdireita(45);
pfrente(100);
pdireita(90);
pfrente(100);
pdireita(45);
pfrente(30);
pdireita(45);
un;
pfrente(100);
ul;
pdireita(90);
pdireita(45);
pfrente(30);
pdireita(45);
pfrente(100);
pdireita(-90);
un;
pfrente(100);
ul;
pdireita(-135);
pfrente(30);
pdireita(45);
un;
pfrente(100);
pdireita(-90);
pfrente(100);
pdireita(-135);
pfrente(30);
pdireita(-90);
pdireita(45);
ul;
pfrente(100);
end.