Question

Crie um algoritmo para converter reais em dólares. (portugol)

Answer 1

eal: real1<-1.00, dolarcnd<-1.64, euro<-2.27, dolartur<-1.63, valor, mbase;

escreva("Informe o valor da base da moeda dolar para conversão:");

escreva(" [US$ = 1.63 turismo] [US$ = 1.73 paralelo] [US$ = 1.57 comercial]");

escreva("Valor da moeda base: ");

leia(mbase);

escreva("Valor a converter: ");

leia(valor);

escreva("O Resultado e: R$ ",(valor*mbase/real1));

escreva("O Resultado e: CDN$ ",(valor*mbase/dolarcnd));

escreva("O Resultado e: E$ ",(valor*mbase/euro));

fim.