Introdução à Programação com o UCB Logo/Procedimentos

Na sessão anterior mostramos como podemos de forma prática desenhar um quadrado, para tanto utilizamos o comando repeat. Mesmo assim, toda vez que desejarmos desenhar um quadrado de tamanho 100, devemos digitar aquela sequencia de comandos. Isto pode ser muito trabalhoso e seria muito mais simples dizer que queremos desenhar um quadrado. Podemos então criar um comando chamado quadrado, o nome correto em programação é procedimento. Vamos então criar um procedimento chamado quadrado. Para tanto, basta fazer como é ilustrado no exemplo abaixo:

to quadrado
repeat 4 [fd 100 rt 90]
end

Agora, toda vez que você der o comando quadrado, irá desenhar um quadrado com lado de tamanho igual a 100.

Quando você definiu o procedimento quadrado, este nome fica reservado para o procedimento que você acabou de criar. Suponha que agora você desenha criar um quadrado cujo lado possui tamanho igual a 200. Se você tentar definir novamente o procedimento quadrado, como acima, receberá uma mensagem de erro dizendo que o procedimento quadrado já está definido. Você deve então apagar o procedimento quadrado definido anterior

erase "quadrado

e então definir o novo procedimento quadrado

to quadrado
repeat 4 [fd 200 rt 90]
end

Se a cada momento você desejar desenhar um quadrado de tamanho diferente, este processo tornar-se-á muito tedioso. Uma maneira de superar este problema é utilizar os parâmetros. Da mesmo forma que o procedimento forward, back, right e left recebem como parâmetro o número de passos ou o ângulo em que a tartaruga irá virar, podemos usar um parâmetro para fornecer ao procedimento quadrado o tamanho do quadrado que desejamos desenhar. Para tanto, devemos fazer assim

to quadrado :tamanho
repeat 4 [fd :tamanho rt 90]
end

Agora tente desenhar quadrados de diferentes tamanhos na tela.