Função ConverterRparaD (Real):
retornar (R * taxa de cambio definida pela empresa)
// Programa Principal
exibir "Conversor de Moeda de Real R$ oara Dolar US$"
exbir "Digite o valor em real R$"
r = ler do usuário
d = ConverterRparaD (r)
exibir "O valor em Dólar é" + d + "US$"
Está certo?