Respostas

A melhor resposta!
2014-05-14T19:50:38-03:00
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
2 5 2