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.

pares ou impares

Fibonacci (Pascal)

somatório de uma matriz 7x5

Executar comando do DOS.

média dos numeros informados em posiçoes pares em um vetor

Nenhum comentário foi encontrado.