Introdução à Programação com o UCB Logo/Expressões Algébricas

Fonte: Wikiversidade

Agora que já sabemos utilizar os operadores algébricos, vamos criar algumas funções para calcular expressões algébricas.

Reta[editar | editar código-fonte]

Vamos começar pelo exemplo mais simples. Suponhamos que você deseja calcular os valores da reta . Para tanto, vamos definir um procedimento que receberá x como parâmetro de entrada, e retornará o valor que a reta assume para um dado x. Para que o procedimento retorne algum valor, vamos utilizar o comando output (abreviadamente op). Para este exemplo, vamos definir o seguinte procedimento

to reta :x
output x + 2
end

E agora, toda vez que você chamar o procedimento reta fornecendo o valor de x, ele calculará o valor que a reta assume no dado x. Por exemplo

print reta 3

Parábola[editar | editar código-fonte]

Vamos agora criar uma função para calcular os valores de uma parábola .

to parabola :x
output (power :x 2) + 2 * x - 1
end

Podemos agora utilizar este procedimento para calcular o valor que a parábola assume em alguns valores de x.

print parabola 1
print parabola 2

Vamos agora fazer a tartaruga desenhar a parábola. Para isto vamos criar o procedimento abaixo

to desenha_parabola :limite
pu 
setxy minus :limite parabola minus :limite
pd
for [x [minus :limite] :limite] [setxy :x parabola :x]
end

Recordando... O comando pu levanta a caneta, para que a tartaruga ande sem desenhar. Já o comando setxy move a tartaruga para uma determinada posição na tela (coordenadas X e Y).

Após definir o procedimento desenha_parabola acima, podemos executá-lo passando como parâmetros o limite em x para o qual queremos traça o gráfico. Veja o exemplo:

desenha_parabola 15

Exercício 1[editar | editar código-fonte]

Agora você vai fazer um programa um pouco mais interativo para somar dois números. Vamos chamá-lo "somador". Após solicitar ao usuário dois números, o programa vai somá-los e imprimir o resultado na tela.

; somador.txt
; (seu nome) (data de hoje)
; Soma dois números fornecidos pelo usuário.

to somador 
; Recebe os valores do usuário.

print [Digite o primeiro numero]
make "var1 readWord
print [Digite o segundo numero]
make "var2 readWord

; Imprime o resultado na tela
print [A soma é]
print :var1 + :var2
end

Exercício 2[editar | editar código-fonte]

Faça um programa interativo para calcular a área de um triângulo.