MOSAICO FORMADO POR OCTÓGONOS E QUADRADOS

MOSAICO FORMADO POR OCTÓGONOS E QUADRADOSOrientanda: Gabriela Baptistella PeresOrientador: Prof. Dr. Mauri Cunha do Nascimentoassim:Para criar o octógono contruimos o procedimento “aprenda octógono” que ficouaprenda octógonorepita 8 [pf 20 pe 45]fimE para o quadrado, fizemos o procedimento “aprenda quadrado”, que ficou assim:aprenda quadradorepita 4 [pf 20 pe 90]fimO objetivo dos procedimentos acima foi construir a figura abaixo:Após criar o procedimentos “aprenda octógono” e “aprenda quadrado”, foipensado em construir uma faixa de octógonos e quadrados. Para construir o procedimentofaixa, foi preciso posicionar a tartaruga na parte superior e esquerda da tela através dosseguintes comandos: un pf 430 pd 90 pt 460Então o procedimento “aprenda faixa1” ficou assim:aprenda faixa1repita 13 [ul octógono pd 90 quadrado pe 90 pf 20 pe 45 pf 20 pd 45 quadrado pe 45pt 20 pd 45 un pf 20 pf (raizq 2)* 20]ul octógono pd 90 quadrado pe 90un pt 20 pt (raizq 2)* 20 pd 90 pf 20 pe 45 pf 20 pe 45fimOs últimos comandos do procedimento “aprenda faixa1” são para posicionar atartaruga para construir a segunda faixa que é o procedimento “aprenda faixa2” que ficouassim:aprenda faixa2ul octógonorepita 12 [pd 90 quadrado pe 90 un pt 40 pt (raizq 2)* 20 ul octógono]

un pt 20 pt (raizq 2)* 10 pd 90 pf 20 pf (raizq 2)* 10 pe 90fimOs últimos comandos do procedimento “aprenda faixa2” são para posicionar atartaruga para a construção da próxima faixa, que é repetindo o comando faixa1, entãorepetindo os comandos faixa e faixa2, o mosaico será construído, mais irá faltar a últimafaixa, que não terá os quadrados embaixo dos octógonos. Então foi construído oprocedimento para executar a última faixa o “aprenda faixa3”, que ficou assim:aprenda faixa3repita 13 [ul octógono pf 20 pe 45 pf 20 pd 45 pf 20 pd 45 un pf 20 pe 45]ul octógonofimDepois de construído o mosaico, a proposta foi pintá-lo, então foi construído oprocedimento “aprenda corfaixa1” para pintar a primeira faixa, que ficou assim:aprenda corfaixa1repita 13 [mudecp [0 98 218] pinte pt 35 pe 90 mudecp [0 163 50] pinte pf 20 pf(raizq 2)* 10 mudecp [0 98 218] pinte pf 20 pf (raizq 2)* 10 pd 90 pf 35]mudecp [0 98 218] pinte pt 35 pe 90 mudecp [0 163 50] pintefimPara pintar a segunda faixa, foi preciso mover a tartaruga usando os seguintescomandos: pd 90 un pf 75 pf (raizq 2)* 20 e foi criado o procedimento “aprenda corfaixa2”que ficou assim:aprenda corfaixa2pd 90 un pf 75 pf (raizq 2)* 20repita 13 [mudecp [0 98 218] pinte pt 32 pd 90 mudecp [0 163 50] pinte pf 20 pf(raizq 2)* 10 mudecp [0 98 218] pinte pf 20 pf (raizq 2)* 10 pe 90 pf 32]mudecp [0 98 218] pinte pt 30 mudecp [0 163 50] pintepf 70 pf (raizq 2)* 20fimE repetindo os comandos corfaixa1 e corfaixa2 o mosaico será pintado, mais iráfaltar a última faixa, pois não terá os quadrados em cima dos octógonos, então o foi criadoo procedimento “aprenda corfaixa3” que ficou assim:aprenda corfaixa3pd 90 pf 40 pf (raizq 2)* 20 pd 90

epita 13 [mudecp [0 163 50] pinte pf 20 pf (raizq 2)* 10 mudecp [0 98 218] pintepf 20 pf (raizq 2)* 10]mudecp [0 163 50] pintefimE depois foi construído o procedimento que ao ser executado, constrói e pinta omosaico todo, que é o “aprenda mosaico” e ficou assim:aprenda mosaicotatun pf 430 pd 90 pt 460repita 13 [faixa1 faixa2]faixa3pf 10 pe 90 un pf 30 pf (raizq 2)* 20repita 6 [corfaixa1 corfaixa2]corfaixa1 corfaixa3fim