Crie um algoritmo que leia o valor do dólar do dia, leia valores de 5 mercadorias em dólares e atualize os valores das mesmas em reais, imprimindo-os.
Soluções para a tarefa
Respondido por
2
Este algoritmo escrevi em Pascal.
Program algoritmo;
Uses crt;
Var
prod1 real;
prod2 real;
prod3 real;
prod4 real;
prod5 real;
dollar real;
Begin
Writeln("Digite o valor atual do Dollar em Reais:");
Readln(dollar);
Writeln("Digite o valor da primeira mercadoria em Dollar:);
Readln(prod1);
Writeln("Digite o valor da segunda mercadoria em Dollar:");
Readln(prod2);
Writeln("Digite o valor da terceira mercadoria em Dollar:");
Readln(prod3);
Writeln("Digite o valor da quarta mercadoria em Dollar:");
readln(prod4);
Writeln("Digite o valor do quinto produto em Dollar:");
Readln(prod5);
Prod1:=prod1*dollar;
prod2:=prod2*dollar;
prod3:=prod3*dollar;
Prod4:=prod4*dollar;
Prod5:=prod5*dollar;
Writeln("O valor do produto 1 em Reais é R$ ",prod1);
Writeln("O valor do produto 2 em Reais é R$ ",prod2);
Writeln("O valor do produto 3 em Reais é R$ ",prod3);
Writeln("O valor do produto 4 em Reais é R$ ",prod4);
Writeln("O valor do produto 5 em Reais é R$ ",prod5);
readln;
End
Program algoritmo;
Uses crt;
Var
prod1 real;
prod2 real;
prod3 real;
prod4 real;
prod5 real;
dollar real;
Begin
Writeln("Digite o valor atual do Dollar em Reais:");
Readln(dollar);
Writeln("Digite o valor da primeira mercadoria em Dollar:);
Readln(prod1);
Writeln("Digite o valor da segunda mercadoria em Dollar:");
Readln(prod2);
Writeln("Digite o valor da terceira mercadoria em Dollar:");
Readln(prod3);
Writeln("Digite o valor da quarta mercadoria em Dollar:");
readln(prod4);
Writeln("Digite o valor do quinto produto em Dollar:");
Readln(prod5);
Prod1:=prod1*dollar;
prod2:=prod2*dollar;
prod3:=prod3*dollar;
Prod4:=prod4*dollar;
Prod5:=prod5*dollar;
Writeln("O valor do produto 1 em Reais é R$ ",prod1);
Writeln("O valor do produto 2 em Reais é R$ ",prod2);
Writeln("O valor do produto 3 em Reais é R$ ",prod3);
Writeln("O valor do produto 4 em Reais é R$ ",prod4);
Writeln("O valor do produto 5 em Reais é R$ ",prod5);
readln;
End
Perguntas interessantes
Geografia,
9 meses atrás
Geografia,
9 meses atrás
Geografia,
9 meses atrás
Matemática,
1 ano atrás
Química,
1 ano atrás
Matemática,
1 ano atrás
Matemática,
1 ano atrás