Script que calcula a carga das unidades se baseado no peso do produto e no peso da embalagem multiplicado pela quantidade de unidades.

• Download calcularCarga.txt
• Enviar nova versão

Esconder código-fonte

 program calcular_carga;

 uses crt;

 var prod,emb,carga:real;
     intUnid:integer;

     begin
     clrscr;
     writeln('Qual o peso do produto?');
     readln(prod);
     writeln('Qual o peso da embalagem?');
     readln(emb);
     writeln('Quantas unidades?');
     readln(intUnid);
     carga:=(prod+emb)*intUnid;
     writeln('a carga total sera',carga);

     end.

controle de notas de um aluno com registro e array

Gerador de senha Pascal/Lazarus

vendas de uma empresa em matriz

Matriz simétrica

Crivo de Eratóstenes Simples em Ada 95

Nenhum comentário foi encontrado.