Dificuldades na Distribuíção de Aves em Cargas
[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
Curtidas 0
Respostas
Ruy Salles
25/01/2016
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
GOSTEI 0
Jorge Rodrigues
25/01/2016
Obrigado Ruy Salles me ajudou muito! Valeu!
GOSTEI 0
Ruy Salles
25/01/2016
Fico feliz em saber que seu problema foi solucionado.
GOSTEI 0