Exemplo: se Teclado.TECLA_PARA_DIREITA então x := x + 1 fim
se Teclado.TECLA_PARA_DIREITA então x := x + 1 fim