Dificuldades na Distribuíção de Aves em Cargas
25/01/2016
0
[img]http://arquivo.devmedia.com.br/forum/imagem/401540-20160125-190907.jpg[/img]
Boa tarde pessoal! Tenho uma dúvida aqui. Em Delphi. No exemplo acima, tenho um lote com 27.456 aves.
Preciso distribuir essas aves em várias cargas (caminhões), sendo que em cada gaiola posso colocar apenas 8 aves, e um caminhão carrega apenas 432 gaiolas.
A última carga será quebrada, pois não tenho o número de aves exatas. Tenho que dizer que X gaiolas terá X aves e Y gaiolas terá Y aves.
O sistema tem que tentar "simular" com uma ave a mais por gaiola, para tentar reduzir o número de cargas, até atingir o limite de peso máximo por gaiola (parâmetro).
Alguém poderia me ajudar ou dar uma luz por gentileza? Muito obrigado!
Boa tarde pessoal! Tenho uma dúvida aqui. Em Delphi. No exemplo acima, tenho um lote com 27.456 aves.
Preciso distribuir essas aves em várias cargas (caminhões), sendo que em cada gaiola posso colocar apenas 8 aves, e um caminhão carrega apenas 432 gaiolas.
A última carga será quebrada, pois não tenho o número de aves exatas. Tenho que dizer que X gaiolas terá X aves e Y gaiolas terá Y aves.
O sistema tem que tentar "simular" com uma ave a mais por gaiola, para tentar reduzir o número de cargas, até atingir o limite de peso máximo por gaiola (parâmetro).
Alguém poderia me ajudar ou dar uma luz por gentileza? Muito obrigado!
Jorge Rodrigues
Curtir tópico
+ 0
Responder
Posts
25/01/2016
Ruy Salles
var
i: integer;
k: float;
begin
k := 27.456 / 8 / 432;
i := trunc(k)
if k - i <> 0 then
i := i + 1 //
end;
O resultado de "i" será o total de gaiolas.
Espero ter ajudado
i: integer;
k: float;
begin
k := 27.456 / 8 / 432;
i := trunc(k)
if k - i <> 0 then
i := i + 1 //
end;
O resultado de "i" será o total de gaiolas.
Espero ter ajudado
Responder
Clique aqui para fazer login e interagir na Comunidade :)