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.

Maior numero do Vetor

Funções strings e matemáticas

Extenso em dll, com parâmetros adicionais

média de uma turma

Crivo de Eratóstenes Simples em Ada 95

Nenhum comentário foi encontrado.