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.

Tocador de vídeo no Lazarus (Delphi 7 para Linux).

controle de notas de uma clase com vetor e registro

script para ler um vetor e mostrar o conteúdo

pares ou impares

Números primos (usando arrays)

Nenhum comentário foi encontrado.