Algoritmo

PASSO 3
ALGORITMO – CONVERSOR DE MOEDAS ETAPA I – APRESENTAÇÃO ALGORITMO EM FLUXOGRAMA
E na seqüência daremos o programa em pseudocódigo:
Programa Escolha_a_moeda;
Var moeda, reais: real;
Inicio
Escrever ("Quantos reais voce tem: ");
Ler (reais);
Escrever ("Para qual moeda você deseja a conversão, sendo 1 para dolar, 2 para euro e 3 para cdn: ");
Ler (moeda);
If (moeda = 1) Escrever ("Voce tem U$: ',reais*1.94,'Dolares ");
If (moeda = 2) Escrever ("Voce tem E$: ',reais*2,30,'Euros ");
If (moeda = 3) Escrever ("Voce tem DCN$: ',reais*1.85,'Dolares Canadenses ");
Fim;
=
A segunda etapa do programa pede que o usuário defina para qual moeda deseja fazer a conversão. Já pré estabelecemos valores para cada moeda, que deverá ser 1, 2 ou 3. Para estes valores definimos que o programa os lerá com o nome de “moeda” e também será uma variável “real”.
A partir daí, dependendo da moeda que ele definiu, o software usa a lógica “IF” (se) moeda for 1 então escreva (“”) que ele tem dólares, usando a formula reais * cotação, que é de 1,94. conversão, a lógica será a mesma. Se moeda selecionada for 2 ele usará a formula de conversão para euros e se for 3 para dólares canadenses. inicio real: moeda_real, valor_dolar, dolar, valor_dolarcnd, dolar_cnd, valor_euro, euro, real_euro, real_dolar, real_dolarcnd; inteiro: escolha1, escolha2; valor_dolar = 1.94; valor_dolarcnd = 1.80; valor_euro = 2.16; real_euro = 2.16; real_dolar = 1.94; real_dolarcnd = 1.80; escreva ("Programa que converte moedas..."); escreva ("Deseja Converter qual moeda ?"); escreva ("Pressione: 1 - Real, 2 - Dolar, 3 - Dolar Canadense, 4 - Euro"); leia(escolha1); se (escolha1==1) então; inicio; escreva ("Voce escolheu converter Real !!!"); escreva ("Deseja Converter a moeda Real para qual moeda ?"); escreva ("1 - Dolar, 2 - Dolar Canadense, 3 - Euro: "); leia (escolha2); fim; se (escolha2==1) então; inicio; escreva("Voce decidiu converter