Algoritmo: três dólares

Algoritmo: Três dólares

Var: Resultado, Resultado2, Resultado3, Resultado4, Resultado5, Resultado6, Dolar canadense, Euro, Dolar turismo, Dolar comercial, Dolar paralelo, Menor: Real

Var: Quantidade, D: Inteiro

Var: Moeda desejada, Moeda: Caractere

INICIO

LEIA Moeda desejada;

SE Moeda desejada = “Real” ENTAO;

FIM_SE

LEIA Dolar turismo, Dolar comercial, Dolar paralelo, Quantidade;

Resultado  Dolar turismo* Quantidade;

Resultado2  Dolar comercial* Quantidade;

Resultado3  Dola paralelo* Quantidade;

ESCREVA Resulado1, Resultado2, Resultado3;

PARA C=1 ATE 3 FAÇA;

LEIA D[C];

FIM_PARA

Menor= D[1];

PARA C=1 ATE 3 FAÇA;

SE D[C] < Menor ENTAO;

Menor  D[C];

FIM_PARA;

Menor  D [C];

FIM_SE

FIM_PARA

Resultado4  Dolar Turismo / Menor;

Resultado5  Dolar Comercial / Menor;

Resultado6  Dolar Paralelo / Menor;

ESCREVA Resultado4, Resultado5, Resultado6;

SENAO

SE Moeda = “Dolar canadense” ENTAO;

LEIA Dolar canadense, Quntidade;

Resultado  Dolar

canadense * Quantidade;

ESCREVA Resultado;

SENAO;

SE Moeda = “Euro” ENTAO;

LEIA Euro, Quantidade;

Resultado  Euro * Quantidade;

ESCREVA Resultado;

FIM_SE

SENAO

SE Moeda desejada = “Euro” ENTAO;

LEIA Moeda;

SE Moeda= “dolar” ENTAO;

LEIA Dolar turismo, Dolar comercial, Dolar paralelo, Quantidade, Euro;

Resultado  Dolar turismo * Quantidade / Euro;

Resultado2  Dolar comercial * Quantidade / Euro;

Resultado3  Dolar paralelo * Quantidade / Euro;

ESCREVA Resultado, Resultado2, Resultdo3;

PARA C=1 ATE 3 FAÇA;

LEIA D[C];

FiM_PARA

Menor = D[1];

PARA