Alghjkuty

inicio

inteiro op1, op2; float vbase,mbase,total;

escreva("Digite o valor base:"); leia("%f", &vbase);

escreva("1 - Real (Brasil) 2 - Dolar (USA) 3 - Euro (Europa) 4 - Libra (Reino Unido) \n 5 – Peso (Argentina) 6 - Lek (Albânia) 7 - Dinar (Tunisia) \n 8 - Shekel(Israel) 9 –Kwanza(Angola) 10 - Kuna (Croácia)"); escreva("Selecione a moeda base:"); leia("%d", &op1);

inicio se/senão se(op1 = 1) mbase<1.000; senão se (op1 = 2) mbase< 2.0249; senão se (op1 = 3) mbase< 2.6403; senão se (op1 = 4) mbase< 3.2624; senão se (op1 = 5) mbase< 0.4302; senão se (op1 = 6) mbase< 0.0191; senão se (op1 = 7) mbase< 0.001; senão se (op1 = 8) mbase< 0.5173; senão se (op1 = 9) mbase< 0.0211; senão se (op1 = 10) mbase< 0.3567; senão escreva("Valor invalido"); fim se/senão

escreva("1 - Real (Brasil) 2 - Dolar (USA) 3 - Euro (Europa) 4 - Libra (Reino Unido) 5 - Peso (Argentina) /n 6 - Lek (Albânia) 7 - Dinar (Tunisia) 8 - Shekel(Israel) 9 - Kwanza(Angola) 10 - Kuna (Croácia)"); escreva("Selecione a moeda futura:"); leia("%d", &op2);

inicio escolha/caso escolha(op2) caso 1 : total<(vbase*mbase/1.000); escreva("A quantia informada vale R$ %.2f", total);

caso 2 : total<(vbase*mbase/2.0249); escreva(“A quantia informada vale $ %.2f", total);

caso 3 : total<(vbase*mbase/2.6403); escolha("A quantia informada vale $ %.2f", total);

caso 4 : total<(vbase*mbase/3.2624); escreva("A quantia informada vale $ %.2f", total);

caso 5 : total<(vbase*mbase/0.4302); escreva("A quantia informada vale $ %.2f", total);

caso 6 : total<(vbase*mbase/0.0191); escreva ("A quantia informada vale $ %.2f", total);

caso 7 :